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6ESPAC Gives You 
More Power Per Square Inch. 




3.937 " 

100 mm 



Here is the size, performance, and 
cost breakthrough you have been 
waiting for: The 68020 based 
GESMPU-20 from GESPAC. 

You tan now unleash an 
unprecedented amount of power 
into your applications. On just 25 
square inches, we hove squeezed 
a 12.5 MHz (16 MHz optional) 
68020 32-bit microprocessor, a 
68881 floating point coprocessor, 4 
sockets for up to 512 Kilobytes of 
EPROM, and up to 512 Kilobytes of 
zero-wait-states CMOS RAM. 

This board is totally expandable 
through its G-64 bus interface. And 
GtSPAC has the largest variely of 
inexpensive memory, interfaces, 
controllers, and transducer cards 
anywhere. Plus real-time disk 
operating systems, high level 
languages,, and other software 
tooFs. GESPAC has the total solution 
to your system integration needs. 

Best of all, because our boards 
are small, they cost less. The new 
GESMPU-20 is priced below $1000 in 
one hundred piece quantity orders. 

So why wait? Contact us today 
for information on the GESMPU-20 
or any of the 150 G-64 bus system 
components from GESPAC— Hie leader 
in single Eurocard microcomputer 
products worldwide. 

Call (602) 962-5559. 
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IN USA - CANADA 

50A West Hoover Ave. 
Meso, Arizona 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONA! 

3, chemin des Aulx 
CH-1228 Geneva 
Tel. (022) 713400 
Telex 429989 



GMX MICRO-20 PRICE LIST 



OPTIONAL PARTS AND ACCESSORIES 



SBC ACCESSORY PACKAGE |M20-AP l 



MICRO 20(12.5 MHz)W/1 SAB S2565 00 

MICRO 20 (16 67 MHz) W/1 SAB S2895.00 

MICRO 20 (20 MHz) W/ 1 SAB $3295 00 

68881 12 SMHz Floating Point Coprocessor $ 195.00 

6888 1 16 67MHz Floaling Pant Coprocessor S 295 DO 

68881 20MHz floating Point Coprocessor $495.00 

MOTOROLA 68020 USERS MANUAL S 18.00 

MOTOROLA 68881 USERS MANUAL .. $ 18.00 

$1690 00 

The package Includes a PC-style cabinet with a custom backpanel. 
a 25 Megabyte (unformatted) hard disk and controller, a floppy disk 
dnve. a 150 watt power supply, cooling tan. panel mounted reset and 
aboil switches, and all necessary internal cabling. (For use with 
SAB— 9D serial connectors only.) 
2nd 5 '80 FLOPPY & CABLES FOR M20-AP. ADD S 250.00 

SECOND 25MB HARD DISK & CABLES. ADO $ 780.00 

TO SUBSTITUTE 50MB HD FOR 25MB HD. ADD S 290.00 

TO SUBSTITUTE BOMB HO FOR 25MB HO, ADO. $1500.00 

TO SUBSTITUTE 155MB FOR 25MB HD. AOD $2100.00 

60 MB TEAC STREAMER WITH ONE TAPE $ 870.00 

PKG 0F5TEACTAPES ........... $112.50 

CUSTOM BACK PANEL PI ATE (BPP-PC) , $ 44.00 

$ 335.00 

The SBC-16S extends the I/O capabilities ol Ihe GMX Micro-20 
68020 Single-board Computer by adding sixteen asynchronous 
serial I/O pons By using two SBC-16S boards, a total ot thirty-six 
serial ports are possible 

.1165.00 

The board provides level-shilling between TTL level and 
standard RS-232 signal levels tor up to 4 serial I/O pons 

HiWBIiiH;HIM l BiltliH:lilW:W .Tiia. 5398 00 

The GMX SBC-60P uses three 68230 Parallel Interlace/ Timers 
(Pl/Ts) to provide up lo lorty-eight parallel I/O lines The I/O lines 
are bullered in six groups ot eight lines each, with separate bulter 
direction control tor each group Butler direction can be tixed by 
hardware jumpers, or can be software programmable lor 
bidirectional applications 

IJ:W1llHJL'lc|-M1;|ilH:lia',TOl $75.00 

means ot developing and testing 
custom I/O inteitace designs lor the GMX Micro-20 68020 Single- 
board Computer The board provides areas lor both DIP (Dual Inline 
Package) and PGA (Pin Grid Array) devices, and a pre wired 
memory area lor up lo 51 2K bytes ot dynamic RAM 

■Hll:llt.1:1iMJIJ:IM:Ufl:m $195 00 

The SEC BA provides an interlace between the GMX Micro-20 
68020 Single-board Computer and Ihe Motorola Input/Output 
Channel (I/O bus) With the I/O bus. up to sixteen off the shell or 
custom peripheral devices (I/O modules) can be connected lo the 
GMX Mtcro-20 

l:l:l4. l lallA.'ll!!irTWWS!l7WglB-t^ | $475.00 

s an interface between the GMX Micro 20 
68020 Single-board Computer and the ARCNET modified token- 
passing Local Area Network (LAN) originally developed by Dalapoint 
Corp The ARCNET is a baseband network with a data transmission 
rate ol 2 5 Megabits/ second The standard transmission media is a 
single 93 ohm RG-62/U coaxial cable Fiber optic versions are 
available as an option 

0S9 LAN Software Driven tor SBC-AN $120.00 



I/O EXPANSION BOARDS 



16 PORT SERIAL BOARD ONLY (SBC-1&SI 



RS23? ADAPTER (SAB 25. SAB 90 Ol SAB-BMI 



GMX MICRO-20 SOFTWARE 



020 BUG UPDATE - PROMS & MANUAL $150.00 

THESE 6S020 OPERATING SYSTEMS ARE PRICED 
WHEN PURCHASED WITH THE MICRO-20. PLEASE 
ADD $150.00 IF PURCHASED LATER FOR THE 
UPDATED PROMS AND MANUALS. ALL SHIPPED 
STANDARD ON 5 'A ' OISKS.3'/,' OPTIONAL IF 
SPECIFIED. 



0S9/68020 PROFESSIONAL PAK $850.00 

Includes S . "C' - , uMACS EDITOR. ASSEMBLER. DEBUGGER, 
development utilities. 68881 support 

0S9/6802O PERSONAL PAK S 400.00 

Personal OS-9 systems require a GMX Micro-20 development 
system running Professional OS-9/6B020 tor initial configuration 



Other Software tor 0S-9/6B02D 


BASIC (Included in PERSONAL PAK) 

C COMPILER (included in PROFESSIONAL PAK) 

PASCAL COMPILER 


$ 200.00 
S 750.00 
$ 500.00 


UNIFLEX 


UniFLEX 


$ 450.00 


UnlFLEX WITH REAL-TIME ENHANCEMENTS 


S 800 00 


Other Software lor UniFLEX 



UnlFLEX BASIC W/PRECOMPILER S 300.00 

UnlFLEX C COMPILER S 350.00 

UnlFLEX COBOL COMPILER S 750.00 

UnlFLEX SCREEN EDITOR TS 150.00 

UnlFLEX TEXT PROCESSOR $ 200 00 

UnlFLEX SORT/ MERGE PACKAGE $ 200.00 

UnlFLEX VSAM MODULE S 100 00 

UnlFLEX UTILITIES PACKAGE I S 200 00 

UnlFLEX PARTIAL SOURCE LICENSE $1000 00 

GMX EXCLUSIVE VERSIONS, CUSTOMIZED FOR 
THE MICRO-20, OF THE BELOW LANGUAGES 
AND SOFTWARE ARE ALSO AVAILABLE 
FROM GMX. 

ABSOFT FORTRAN (UniFLEX) $1500.00 

SCULPTOR (specify UniFLEX or 0S9) S 995 00 

FORTH (0S9) S 595.00 

DYNACALC (specify UniFLEX or 0S9) $ 300.00 

GMX DOES NOT GUARANTEE PERFORMANCE OF ANY GMX 
SYSTEMS. BOARDS OR SOFTWARE WHEN USED WITH 
OTHER MANUFACTURERS PRODUCT. 

ALL PRICES ARE FOB. CHICAGO IN U.S. FUNDS 

TO ORDER BY MAIL. SEND CHECK OR MONEY ORDER OR USE 
YOUR VISA OR MASTER CHARGE Please allow 3 weeks lor 
personal checks lo clear US orders add $5 handling if under 
$200 00 Foreign orders add $10 handling if order is under 
$200 00 Foreign orders over $200 00 will be shipped via Emery Air 
Freight COLLECT, and we will charge no handling All orders must 
be prepaid in U S lunds Please note thai foreign checks have 
been taking about 6 weeks tor collection so we would advise wiring 
money, or checks drawn on a bank account in the U S Our bank is 
the Continental Illinois National Bank of Chicago. 231 S LaSalle 
Street. Chicago, IL 60693. account number 73-32033. 

CONTACT GMX FOR MORE INFORMATION ON THE ABOVE 
PRODUCTS 

GMX STILL SELLS GIMIX S50 BUS SYSTEMS. BOARDS & PARTS 
CONTACT GMX FOR COMPLETE PRICE LIST 



CHIX" 1337 W. 37lh Place. Chicago, IL 60609 (312) 927-5510 — TWX 910-221-4055 — FAX (312) 927-7352 
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EXCITING SOFTWARE FROM THE LEADER. 



— TncctenuafcL*-— 




OS-9 ELECTRONIC MAIL 

I'lash your message on Klectronic Mail Mail is a 
screen or line oriented program that runs on your 
OS 9/680X0 systems or over OS 9/NKT You can use 
distributed mailing lists or consecutive mailing list to 
get your message delivered And received m.iil can lie 
sent directly to your printer tor immediate printout, 
spooled on a multiuser system or saved to a file Mail 
features on line help and complete, easy to understand 
documentation 
Klectronic Mail $150 Ml 



OS-9/ST 

N KW for your ALiri ST! Now you can have the power of 
OS II on your Atari 520 or 1040 ST A true 
multi tasking environment for professional real time 
results OS 9/ST is available in two configurations: 
Personal and I'mlessional Choose either version lor 
true in til t i user support And all at a price that puts 
UNIX to shame 

Personal OS 9/STcnmliines the power of OS 9 with 
an interactive, structured Music $150 00 



PRINT SPOOLER 

Spool it and Print il! Someone beat you lo the printer 9 
Don't blow your top while you cool your heels gel the 
OS 9/68000 Print Spooler and relax The lull featured 
Print Spooler automatically routes and monitors the 
status of your devices and the output files to lie spooled 
Now you can have a complete print spooling manage 
inent system at an affordable price 
OS 9 IVint Spooler $150 00 

FORTRAN 

Crunch II! with Our New KOKTTtAN 77 Compiler Now 

you have a powerful new tool lo lake full advantage of 
the 68000 family of microprocessors With Microware's 
KOKTKAN 77 Compiler you can generate c<xlc thai uses 
system wide modules instead of linking redundant 
copies of the standard library to each program Kesult 
less memory, less disk space, faster loading and 
external updating! 
I'OKTKAN 77 Compiler $750 00 



IVofessional OS 9/ST has a powerful Assembler, 
Linker and I'ser Debugger and the tools lo turn 
your Atari ST into a full C Language 
workstation $600 00 

OS-9/68020 C COMPILER 

NKW "speed demon" C Compiler! Now you can get your 
IhiiuU on a highl} optimized C language power 
i .hi I the OS 9/li8ll'2ll C Compiler When coupled with 
the MC6888 1 math co processor, this compiler will lei 
>ou'll blast through complex math functions in the 
blink of an eye All compiler/assembler/linker options 
rire controlled li> .in intelligent compiler executive that 
spares you from memorizing compiler options and 
module calling sequences And the compiler includes 
library functions for memory management and system 
even Is, and much, much more! The new OS 9/68020 C 
Compiler is included with the Professional OS 9/68020 
System Sillware Package 
NewC language Compiler $750 00 



'Co order these exciting N l-'.W products or for more inloi illation 
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4 119 1 loncho 4 Chome. Punabashi City * Chiba 273. 
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Microware Is on the move We have openings for Technical and Marketing Professionals 

Send your resume (in confidence I today and find out more about these exciting opportunities. 

05-9 and BASIC09 are fietiemarks at Micron/are and Momma UNIX Is a trademark of BeM Laboratories. Inc. 
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The MUSTANG 020 68020 SBC provides a powerful, 
compact, 32 bit computer system featuring the "stale of the art" 
Motorola 68020 "super" micro-processor. It comes standard 
with 2 megabyte of high-speed SIP dynamic RAM, serial and 
parallel ports, floppy disk controller, a S ASI hard disk interface 
for intelligent hard disk controllers and a battery backed up 
timc-of-day clock. Provisions arc made for the super powerful 
Motorola MC68881 floating point math co-processor, for 
heavy math and number crunching applications. An optional 
network interface uses one serial ( four <4) standard, expandable 
to 20) as a 123/bit per second network channel. Supports as 
many as 32 nodes. 

The MUSTANG-020 is ideally suited to a wide variety of 
applications. It provides a cost effective alternative to the other 
MC68020systems now available. It is an excellent introductory 
tool to the world of hi- power, hi-spced new generation "super 
micros"- In practical applications it has numerous applications, 
ranging from scientific to education. It is already being used by 
government agencies, labs, universities, business and practi- 
cally every other critical applications center, worldwide, wltcrc 
true multi-user, multi-tasking needs exist. The MUSTANG- 
020 is UNIX C level V compatible. Where low cost and power 
is a must, the MUSTANG-020 is the answer, as many have 
discovered. Proving that price is not the standard for quality! 

As a software development station, a general purpose 
scientific or small to medium business computer, or a super 
efficient real-time controller in process control, the MUS- 
TANG-020 is the cost effective choice. With the optional 
MC68881 floating point math co-processor installed, it has the 
capability of systems costing many times over it's total acqui- 
sition cost. 

With the DATA-COMP "total package", consisting of a 

f =• 

Data-Comp Division 

p J^^~.\ A P«adc of Quality Service'^ 
r[ \ i v [M/ Systems WaidWkte 

Computer Publishing, Inc. 5900 Cassandra Smith Road 
Telephone 615 842-4601 • Telex 510 600-6630 Hbson, Tn 37343 



DATA-COMP Proudly Presents the First 

Under $4300 "SUPERMICRO" See other 

advertising (backcover) for economy 

system (68008) - under $2400 complete! 



heavy duly metal cabinet, switching power supply with rf/linc 
by-passing, S inch OS/DO 80 track floppy. Xebec hard disk 
controller. 25 megabyte Winchester hard disk, four serial RS- 
232 ports and a UNIX C level V compatible multi-tasking, 
multi-user operating system, the price is under $4300, w/12.5 
megahertz system clock (limited time offer). Most all popular 
high level languages arc available at very reasonable cost, The 
system is expandable to 32scrial ports, at a cost ofless than S65 
per port, in multiples of 8 port expansion options. 



The SBC fully populated, quality tested, with4 senal ports 
prewired and board mounted is available for less that $2500. 
Quantity discounts are available for OEM and special applica- 
tions, in quantity. All that is required to bring to complete 
"systcm"slandards is a cabinet, power supply, disks and oper- 
ating system. All these arc available as separate items from 
DATA-COMP. 




Available 12 J- 25 Mki systems, call for special prices 

A special version of the Motorola 020- BUG is installed on 
each board. 020. BUG is a ROM based debugger package with 
facilities for downloading and executing user programs from a 
host system. It includes commands for display and modifica- 
tion of memory, breakpoint capabilities, a powerful assembler/ 
disassemble and numerous system diagnostics. Various 020- 
B UG system routines, such as I/O handlers arc available for user 
programs. 

Normal system speed is 3 4.5 MIPS, with burst up to 10 
MIPS, at 16.6 megahertz. Intelligent I/O available for some 
operating systems. 

Hands, on "actual experience sessions", before you buy. 
are available from DATA-COMP. Call or write for additional 
information or pricing. 
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Mtutang-020 Mustang-OS Benchmark* 
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Mustang Specifications 

12 5 Mhi (optional 166 Mh« available) MC68020 full 32-b.t wide path 

32-bit wide data and address buses, run multjpleicd 

on chip tntvitcUaTi cache 

object code compatible with all 68XXX family rjnsocuaai 

enhanced imtruoioD set math co-ptocen or interface 

68881 muh lu-apeed lloattrtg point co-prorxxaar (optusuJ) 

direct cjruzuMvj of fall 68020 irtstrueoon set 

fulltoppott IEEE P754. draft 100 

tnsaaOundciltAl end other adervuSc malh fuiKXicaU 

2 Megabyte of SIP RAM (512 1 32 bit orgimrjoon) 
uplo2S6K bytea of EPROM (64 a 32 bits) 

4 Asynchronous serial I/O porta auauUrd 
orjaienal u> 20 aerial pom 
nutdaid RS-232 Imof ace 
omjena] network imcrface 

f ered I tnl parallel port (1/2 MC68230) 
CenutMica type pinoul 
eapanaion conrexurr for I/O device* 
1 6 bit data path 
256 byte addrtmi apace 
2 interrupt iitpula 
clock and control fignlla 
Motorola VO Channel Modulo 
tuneof day clocaJcalendiT w/battety backup 
controller for 2. S 1/4" floppy diak dnvoa 
nngle or double aide, tingle or double dens ity 
33 to SO track aelecuble (4*96 TPI) 
SASI uitcrface 

programm able periadic tnienupt generator 
mlemjpl rate from mun> teecndslo acconda 
highly aecwaie time bate (5 PPM) 

5 bit aenae switch, readable by the CPU 
Hardware single- step capability 

Tricac bi-»j"™»d 68020 svstema arc preaently wotking it NASA. Atomic Energy Cccnmuswn. 
G munHai it Agencua as well aa L'ru wruDa. Btaineaa. Labs, and other Cribcil Applicankvai 
Ccracrs. ■roddariiie, where apeed, malh ciuvaina and muM-iuer. muhi-uaking UNIX C level 
V conpatabiuty and low coat is a moat 




Don't be mislead! 
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A Tutorial Series 


By: Dr. E. M. "Butf P&ss 
1454 Lana Lane N.W. 
Convers. OA 30207 
404 483-1717/4570 

Computer Systems Consultants 



INTRODUCTION 

This chapter continues the discussion and 
presentation of a public-domain portable math 
library written In C by Fred Fish. 

MATH LIBRARY 

The acos.c function returns the arc cosine of 
its argument , 



acos double precision arc cosine 



•Include <stdio.h> 

•Include "pmluser.h" 
• include "pntl.h" 



static char 


f uncname [ ) 


double acos 


(X) 


double x; 
( 





double y; 

extern double acanl); 

extern double sqrtO; 

auto struct exception xept; 

0BUG_ENTER (funcname); 
DBUG 3 Pacosln", "art »le" 
if (x > 1.0 II x < -1.01 
I 

xcpt.type • DOMAIN; 

xcpt.name - f uncname; 

xept . argl » x; 

if Umatherr (txept)) 



x), 



( 



funcname); 



> 



fprintf (stderr. "»s: DOMAIN error\n", 

errno • EDOH; 
xcpt.retval • 0.0; 



( 

else 
if (!x> 
( 

xcpt.retval • HALfPI; 



t 

else 

if (x — 1.0) 

( 

xcpt.retval - 0.0; 
) 

else 

if (x — -1.0) 
1 

xcpt.retval « PI; 
) 
else 

I 

y - atan ( sqrt (1.0 - (x • x) ) / x ); 
f (x > 0.0) 

xcpt.retval ■ y; 



xcpt.retval - y + PI; 



DBUG_3 ("acosout", "result »le", x) j 
DBUC RETURN (x) ; 



The acosh . o function returns the hyperbolic 
tie cosine of its argument. 



acosh double precision hyperbolic arc cosine 



•include <stdio.h> 
• include "pmluser.h* 
•include "pml.h" 

static char f uncname [ 1 - "acosh"; 

double acosh (x) 

double x; 

( 

auto struct exception xept; 
extern double log ()•' 

extern double sqrt () ; 

DBUG_ENTER (funcname); 

08UG_3 ("acoshin", "arg »le", x) ; 

if (x < 1.0) 
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1 

wept. type - DOMAIN; 


1 
else 


xept. name - funcname; 


if (x — 1.0) 


xcpt.argl - x; 




if (imatherr Uxcptl) 
( 

fprlntf (stderr, "Is: DOMAIN error\n". 


xept. retval - HAIFPI; 


else 


funcivans) ; 


if (x « -1.0) 


errno - ERANGE; 




xept .retval - 0.0; 

\ 


xept. retval - -HAliTI; 


1 


else 


else 




If (X > SQRTJiAXDOUBLE) 
( 


xept. ret val - atan ( x / sqrt (1.0 - (x * x) ) 


xcpt.type - OVERFLOW; 


1; 


xept .name - funcnanv; 


DBUG_3 ("aslnout", "result lie", xept. retval) ; 


xcpt.argl • x; 


DBUG'RETURN ( xept . ret va 1 ) ; 


lf (Imatherr (Ixcpt )) 
■ 


I 


1 

fprlntf (st-derr, "Is: OVERFISH errorW, 




funcnaire) ; 


Tba aainh.c function returns tba hyperbolic 


errno - ERANGE; 


arc alna of ita argunant . 


x - SORT KAXDOUBI.E; 




xept. ret val - log (J • SORTJiAXDOUBLE) ; 

) 




1 


/* 
* asinh double precision hyperbolic arc sine 


else 
f 


*/ 


\ 

xept,. retval - log (x » sqrt |x ■ x - 1.0)); 


•Include <stdlo.h> 


) 


• include "pmluser.h" 


DBUO_3 ("acoshout". "result lie", xept. retval) ; 


• include "pml.h" 


DBUG~RE7URN Ixcpt . ret val) ; 




1 


static char funcnane [ ] - "asinh"; 


The aain.o function returns the arc >ln« of 


double asinh (x) 


it» argument. 


double x; 
i 




i 

auto struct exception xept; 


/■ 


extern double log I); 


• asln double precision arc sine 


extern double sqrt I); 


DBUG ENTER (funcnane); 


•include <stdio.h> 


DBUG 3 ("aslnhin". "arg lie", x); 


•include "pmluser.h" 


if (X < -SORT_KAXDOUB1£ 1 I X > SQRT HAXDOUB1.E) 


•Include "pnl.h" 


( 




xcpt.type - OVERFLOW; 


static char funcnamet) - "asin"; 


xept. .name ■ funcnane ; 




xcpt.argl - x; 


double asln (x) 


if ( Imatherr (txept) ) 


double x; 


i 


1 


fprlntf (stderr, "Is: OVERFISH error\n". 


extern double atan ; 


funcname) ; 


extern double sqrt (I; 


errno - ERANGE; 


struct exception xept; 


xcpt. .retval - log (2 • S0RTJWXD0UB1.E] ; 


DBUG ENTER ffuncname); 


) 
) 


DBUC 3 ("astnln". "arg lie", x) ; 


else 


If ( x > 1.0 I I x < -1.0) 


( 


1 


xept. ret val - log (x » sqrt (x * x -t 1.0)); 


xcpt.type - DOMAIN; 


) 


xept .name - funcnane ; 


DBOG_3 ("asinhout", "result lie", xept .retval ) ; 


xcpt.argl - x; 


DBUG RETURN (xept -retval) ; 


if (imatherr Uxcptl ) 
l 


) 


fprlntf (stderr. "Is: DOMAIN errorVn", 




funcnamc) ; 


Tba atan.c function returns tba arc tangent 


errno - EOOM; 


of ita argument. 


xept. ret val - 0.0; 

r 

i 




/• 


else 


* atan double precision arc tangent 


If <!x) 
1 

xept. retval - 0.0; 


V 
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•include <stdio.h> 




•Include "pmluser.h" 
•include "pml.h" 


ermo - EDOM; 
xept . retval - x; 
) 


static double atan cceffsU - 


) 


1 


else 


.9999999999999999849899, /* PO must be first 
*/ 


1 

xt2 • x * x; 


-.333333333333299308717, 


order - sizeof (atancoef fs) / slzeof (double) ; 


.1999999999872944792, 
-.142857141028255452, 


order -■ 1; 
xcpt.retval - x " poly (order, atan_coe[fs. 


.11111097898051048, 


xt2) ; 


-.0909037114191074, 

.0767936869066, 

-.06483193510303, 


) 

DBUG 3 ("atanout", "result lie", xcpt.retval); 

DBUG~RETURN (xcpt.retval); 


.0443895157187 /* Pn must be last */ 
); 


) 


static char funcname [] • "atan"; 


The atan2.c function returne tba arc tangent 
of ita argumantc, equivalent to atan(y / x) . 


•define LAST_BOUND 0.2679491924311227074725 /• tan 




(PI/12) */ 


/* 


double atan (x) 


* atan2 double precision arc tangent of two 


doub le x; 
( 

register Int order; 

double xt2; 

double tl; 

double t2; 


arguments 
'/ 


•Include <stdio.h> 
•include "pmluser.h" 
•include "pml.h" 


extern double poly (); 


double atan2 (x, y) 


auto struct exception xept; 


double x; 




double y; 


DBUG ENTER (funcname); 


( 


DBUG 3 ("atanin", "arg %le", x) ; 


double result; 


If (X < 0.0) 


extern double sign (I ; 


( 


extern double atand ; 


xcpt.retval - -(atan (-x)l; 




1 


ENTER ("atan2">; 


else 


DEBUG4 (iatan2in", "x - *le y = *le", x, y) ; 


if (x > 1.0) 
( 

if (x < MAXDOUBLE 44 x > -KAXDOUBLE) 


if (!x) 


result - 3ign (HALFPI, y) ; 


\ 

xcpt.retval - HALFPI - atan (1.0 / x) ; 


else 


) 


if (x > O.D) 


else 




! 


result « atan (y / x); 


xcpt.type - UNDERFLOW ; 




xept. name • funcnaire; 


else 


xept . a rgl - x; 




if Umatherr Kxcpt)) 
f 


result = atan (y / x) + sign (PI, y) ; 


f print f Istderi, "*s: UNDERFLOW 


DEBUG3 C , atan2out", "result %le", result); 


error\n", funcname); 


LEAVE ((; 


errno - EDOM; 


return (result) ; 


xcpt.retval - 0.0; 
\ 


1 


1 
) 


The atanh. e function return* the hyperbolic 


else 


arc tangent of it* argument. 


if (x > LAST_BOUNDI 




( 

tl - x * SQRT3 - 1.0; 


/* 


t2 - SQRT3 * x; 


* atanh double precision hyperbolic arc tangent 


xcpt.retval = S1XTHPI ♦ atan (tl / t2); 
) 
else 


•/ 


•include <stdio.h> 


if (x < X16 UNDERFLOWS) 


•include "pmluser.h" 


( 


•include "pml.h" 


xcpt.type - PLOSS; 




xcpt.name • funcname; 


static char funcname [] • "atanh"; 


xcpt.aigl - x; 




if (fmatherr ((.xept) ) 


double atanh (x) 


t 

fprintf {stderr, "*s: PLOSS error\n". 


double x; 
( 


funcnaire) ; 
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auto struct exception xcpt.; 
extern double log (); 

DBUC_ENTER (funcname) ; 

DBUG~3 ("atanhin", "arg »le", x) ; 

If (x <- -1.0 It x >- 1.0) 

( 

xcpt. type - DOMAIN; 

xcpt. name « funcname; 

xcpt.argl - x; 

If (imatherr (txcpt)) 

( 

fprlntf (stderr, "%s: DOMAIN error\n". 



funcname ) ; 



errno - ERANGE; 
xcpt . retval - 0.0; 



else 
( 



xcpt. retval - 0.5 « log ((1 * x) / 11 



x)); 



DBUG_3 ("atanhout", "result lie", xcpt .retval) ; 
DBUG_RE7URN (xcpt .retval) ; 



The cibi.o function returns the complex 
absolute value of Its argument. 



cabs double precision complex absolute value 



•include <stdio.h> 
•Include "pmluser.h" 
•include "pml.h" 

double cabs (z) 

CCWLEX z; 

( 

double result ; 

extern double sqrt D.- 

ENTER ("cabs"); 
DEBUG4 ("cabsln", "arg lie +j %le", z.real, 

z . imag) ; 

result - sqrt ((z.real * z.real) * (z.imag * 

z . imag) ) ; 

DEBUG3 ("cabsout", "result lie", result) ; 
LEAVE ; 
return (result); 

I 



The cacoa.c function returns the cooplex arc 
cosine of its argument. 



* cacos complex double precision arc cosine 



•include <stdio.h> 
•include "pmluser.h" 
•include "pml.h" 

COMPLEX cacos (z) 

coteiEX z,- 
( 

CC**?I£X temp; 
double swaptemp; 

extern COtf?l£X csiult 0, csqrt 0, clog O.- 
ENTER ("cacos"); 
DEBUG4 ("cacosin", "arg lie tie", z.real, z.imag); 



temp - emu It (z, z) ; 

temp. real - 1.0 - temp. real ; 

temp, imag - -temp. imag; 

temp - csqrt (temp) ; 

swaptemp - temp. real ; 

temp. real - -temp. imag; 

temp. imag - swaptemp ; 

temp. real *~ z.real; 

temp.imag +- z.imag; 

temp - clog (temp); 

z.real - temp. imag; 

z.imag ■ -tenp.real; 
DEBUG4 ("cacosout 
z . imag) ; 

LEAVE () ; 

return (z); 
) 



The cadd.c function returns the complex aum 
of its arguments. 



result lie tie", z.real, 



*/ 



cadd double precision conplex addition 



•include <stdio.h> 
•include "pmluser.h" 
•include "pml.h" 

COtf?I£X cadd (zl, z2) 
CCWLEX zl; 
COPLEX z2; 
( 

ENTER ("cadd"); 

zl.real +» z2.real; 

zl.lmag +■ z2.imag; 

LEAVE (); 

return (zl); 



The casln.c function returns the complex arc 
sine of its argument. 



casln complex double precision arc sine 



•include <stdio.h> 
•include "pmluser.h" 
•include "pml.h" 

COWLEX casin (z) 

COWLEX z; 

( 

C0M?I£X tenp; 

extern COt«?I£X csqrt 0, clog (), cmjlt 0; 



z.real, z.imag); 



ENTER ("casln"); 

DEBUG4 ("casinin", "arg lie lie" 

temp - cmult <z, z) ; 

tenp.real - 1.0 - temp. real ; 

tenp.imag ■ -temp, imag; 

temp • csqrt (temp) ; 

temp. real — z.imag; 

temp. imag ♦- z.real; 

teirp - clog (temp) ; 

z.real - temp, imag; 

z.imag - -teirp. real; 
DEBUG4 ("caslnout", "result %le tie", z.real, 
z . inag) ; 

LEAVE () ; 

return (z); 
) 
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Tha citin.a function xatuxna tha complax arc 
tangant of lta axgumant . 



catan conplex double precision arc tangent 



•include <stdio.h> 

♦Include "pmluser.h" 
•include "pml.h" 

COMPLEX catan (z) 
COMPIEX z; 

( 

COMPI£X temp; 

double swaptemp; 

extern COMPLEX cdiv 0, clog (); 

ENTER ("catan") ; 

DEBUG4 ("catanin", "arg tie tie", z.real, z.imag); 

temp. real « -z.real; 

temp, imag - 1.0 - z.ijnag; 

z.imag +- 1.0; 

z - cdiv [z, temp) ; 

z - clog (z) ; 

swaptemp «• z.real; 

z.real ■ -0.5 * z.imag; 

z.imag - 0.5 * swaptemp; 

DEBUG4 ("catanout" , "result tie tie", z.real, 
z.imag) ; 

LEAVE {) ; 

return (zl; 
I 



Tha ccoa.e function xaturna tha coraplaj 
coalna of lta axgumant. 



ccos complex double precision cosine 



•include <stdio.h> 
• include "pmluser.h"' 
•include "pml.h" 

COMPIEX ccos (z> 
COMPI£X z; 



COMPLEX result; 
extern double 



sin<), cost), sinhO, coshl); 



ENTER ["ccos"); 

DEBUC4 ("ccosin", "arg tie tie", z.real, z.imag); 

result. real - cos(z.real) ' cosh (z.imag) ; 

result. imag • -sin(z.real) " sinh (z.imag) ; 

DEBUG 4 ("ccosout", "result tie tie", result. real, 
result. Imag) ; 

LEAVE ; 

return (result); 
t 



Tha ccoah.c function raturna tha complax 
hyparbolic coaina of lta axgumant. 



ccosh complex double precision hyperbolic 



cosine 
V 



♦Include <stdio.h> 
•Include "pmluser.h" 
•include "pml.h" 



COMPI£X ccosh (2) 

COMPLEX z; 

( 

COMPI£X oaxpmz; 

extern COMPI£X cexp 0; 

ENTER ("ccosh"); 

DEBUC4 ("ccoshin", "arg tie tie", z.real, z.imag); 

cexpmz. real ■ -z.real; 

cexpntz.imag = -z.imag; 

cexpmz « cexp (cexpmz) ; 

z - cexp (z) ; 

z.real += cexpmz. real ; 

z.imag +«• cexpmz .imag; 

z.real »= 0.5; 

z.iniag *■ 0.5; 

DEBUG4 ("ccoshout", "result tie tie", z.real, 
z . imag) ; 

LEAVE (J; 

return (z) ; 
1 



Tha cdiv.c function xatuxna tha complex 
quotlant of lta axgumant. 



'/ 



cdiv double precision complex division 



"argl tie tie", znum.real, 
"arg? tie tie", zden.real. 



•include <stdio.h> 
•include "pmluser.h" 
•include "pml.h" 

CDMPI£X cdiv (znum, zden) 
COMPLEX znum; 
COMPI£X zden; 
1 

COMPI£X result; 

double denom; 

ENTER ("cdiv"); 
DEBUG4 ("cdivin", 
znum. imag) ; 

DEBUG4 ("cdivin", 
zden. imag) ; 

denom = (zden.real * zden.real) * (zden. imag * 
zden. imag) ; 

if ( fdenom) 
( 

pcnlerr (C_DIV_ZERO) ; 
result. real - MAX_POS_DBIJ'; 
result. imag = 0.0; 

} 
else 

< 

result. real - ((znum.real * zden.real) * 

(znum. imag * zden. imag)) / denom; 
result. imag - ((zden.real * znum. imag) - 
(znum.real * zden. imag)) / denom; 
) 

DEBUG4 ("cdivout", "result tie tie", result. real, 
result, imag) ; 
LEAVE ( ) ; 
return (result) ; 
) 



C PROBLEM 

There Is no concise answer to the problem of 
certifying a math library. The functions in the 
library are generally not very homogeneous, so 
they may not easily be classified into just a few 
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groups, each of which could then be tested as a 
unit. 

For each function, a series of valid and invalid 
argument values may be provided, and the results 
of each argument may be checked against a list of 
results computed by a previously-certified math 
llbraiy. Although this Is really "probing", not 
"testing" or "certifying", and does not necessarily 
detect all types of problems, it is usually effective 
enough to provide some Indication that the math 
library functions are performing correctly. 

EXAMPLE C PROGRAM 

Following Is this month's example C program: it 
tests the default error-handling capabilities of 
the portable math llbraiy and provides examples 
of calling many of the functions in the portable 
math library. 



■ testerrors.c error handler test for portable 

math library 

* tests functions of the optional error handler 
for the poitable 

* math library. tests the COUNT, LOG, and 
CONTINUE bits for 

* each function, along with the task error Unit. 



Ilnclude <stdlo.h> 
• Include "penluser.h" 
Ilnclude "pal.h" 

char *testl{] - 

( 

-\ n ...... .j£ ST n ......«_ 

■ ii 

" Generate all errors", 
an 

(1) IOC bits, COUNT bits, and CONTINUE bits 
set . ", 

" (2} Error limit set high enough to avoid 

aborting.", 

IIM 

" This test should generate an error message 

for each", 

" error tested, and the final error count should 
be printed", 

" when done.", 

"\n", 


); 



char *test2U - 

( 

.\ n ...... test |2 



■ Turn off logging.", 

«■ 

■ (1) LOG bits reset.", 

(2) COUNT bits and CONTINUE bits set.", 
■ (3) Error limit set high enough to avoid 

aborting.", 

" This test should not log any error messages 

but the error", 

" count should be the sane as test 1.", 



"Xn", 




char 'testa!) - 

( 

.\ n ...... TCST l3 ,.....„ 

■ ■ 

" Turn off error counting", 

t 

" (1) LOG and COUNT bits reset.", 
" (2) CONTINUE bits set.", 
" (3) Error limit set to 0.", 

mm 

" This test should not log or count any errors. 

The final", 

" error count should be zero.", 
"\n", 



}; 



char 'test 4 [J - 

t 

"Xn"***« TEST |4 •***••», 

■' Enable error limit arid abort.", 

" (1) LOG bits, COUNT bits, and CONTINUE bits 

set.", 

(2) Error limit set to 5.", 

" This test should abort after logging the 

sixth error.", 

"Xn". 


); 



malnO 



Initialize!), - 

pnlllmHO); 

prtdocltest 1) ; 

gen_errors() ; 

printf {"XnTotal errors counted - %d\n", pnlcntO); 

logoffO; 

ptilllm(40); 

prtdoc(test2) ; 

gen_errors() ; 

printf ("XnTotal errors counted - tdXn", pnlcntO); 

count_off () ; 

pnlllm(O); 

prtdoc(test3) ; 

gen errors ; 

printf ("XnTotal errors counted - %dXn", pnlcntO); 

Initialised , • 
pmlllm(S); 
prtdocltestO,- 
gen_errors() ; 

) 



pildoc (dp) 
register char 
( 

while Cdp) 



•dp; 



( 



printf ("%sXn", *dp*+); 
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initialize I) 
( 

pmlsfs(BXP_0VERFLOW, LOG I COUNT I CONTINUE) ; 

pmlsfs(EXP_UNDERFLOW, LOG I COUNT I CONTINUE); 

pmlsfs(SCA[,E_OVERFLOW, LOG I COUNT I CONTINUE); 

pmlsfs(SCALE~UNDERFLOW, LOG I COUNT I CONTINUE); 

pmlsfs(NBG_SQRT, LOG I COUNT I CONTINUE); 

pmlsfstLCCOFZERO, LOG I COUNT I CONTINUE); 

pmlsfs(LOG_OF_NEGATIVE, LOG 1 COUNT I CONTINUE); 

pmlsfs(ACQS_BADARG, LOG I COUNT I CONTINUE) ; 

pmlsfs (ASINBADARG, LOG I COUNT I CONTINUE); 

pmlsfs (TAN_OVERFLOW. LOG 1 COUNT I CONTINUE); 

pmlsfs (COSH_OVERFIOW, LOG I COUNT I CONTINUE); 

pmlsfs <COSH_UNDERFLOW, LOG I COUNT | CONTINUE); 

pmlsfs (SINHJDVERFLOW, LOG I COUNT I CONTINUE); 

pmlsfs (SINH^UNDERFLOW, LOG I COUNT I CONTINUE); 

pmlsfs ( AS INHOVERFLOW, LOG i COUNT 1 CONTINUE); 

pmlsfs (ACOSHBAOARG, LOG I COUNT I CONTINUE); 

pmlsfs (ACOSH_OVERFI0W, LOG I COUNT I CONTINUE); 

pmlsfs (ATANH_BAOARG, LOG I COUNT I CONTINUE); 

pmlsfs (ATAN UNDERFLOW, LOG I COUNT I CONTINUE) ; 

pmlsfs (C_DIV_ZERO, LOG I COUNT I CONTINUE); 

pmlsfs (CRCP_OF_ZERO, LOG I COUNT I CONTINUE); 

pmlsfs (DINT~2BIC, LOG I COUNT I CONTINUE); 



logoff 

( 

pnlcf s 
pmlcfs 
pmlcfs 
pmlcfs 
pnilcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 
pmlcfs 

I 



(EXP OVERFLOW, LOG) ; 
(BXPJMDERFLOW. LOG) ; 
<SCALE_OVERF[£>W, LOG); 
(SCALE UNDERFIOW, LOG); 
(NEC_SQRT, LOG); 
(LOGOFZERO, LOG); 
(LOG~OF_NEGATIVE, LOG); 
(AC0S_6A0ARG. LOG); 
(ASIN_BAOARG, LOG); 
(TAN_OVERFLOW, LOG); 
[COSHOVERFLOW, LOG) ; 
<C0SH_UNC€RFIOW, LOG) ; 
(SINH_OVERFLOW, LOG); 
(SINHJJNDERFIOW, LOG); 
(ASINH_OVERFl£>W, LOG) ; 
<ACOSH_BADARG, LOG); 
(ACOSH_OVERFLOW, LOG); 
(ATANH BAOARC, LOG); 
(ATAN UNDERFLOW, LOG) ; 
<C_DIV_ZERO, LOG) ; 
(CRCP OF ZERO, LOG) ; 
(D1NT~2BIG, LOG); 



count off 
! 

pmlcfs (EXP_OVERFLOW, COUNT) ; 

pmlcfs (EXPUNDERFLOW, COUNT); 

pmlcfs (SCALE OVER FLOW, COUNT) ; 

pmlcfs (SCALE UNDERFLOW, COUNT); 

pinlcfslNEG_SORT. COUNT); 

pmlcfs (LOG_OF_ZER0, COUNT); 

pmlcfs(LOG OF NEGATIVE, COUNT); 

pmlcfs (ACOSBADARG, COUNT); 

pmlcfs (ASIN BADARC, COUNT) ; 

pmlcfs (TAN_OVERFLOW, COUNT) ; 

pmlcfs (COSH_OVERFLOW, COUNT); 

pmlcfs (COSH UNDERFLOW, COUNT) ; 

pmlcfs (S1NHOVERFLOW, COUNT) ; 

pmlcfs (SINHUNDERFLOW, COUNT); 

pmlcfs <AS)N1|_OVERFLOW, COUNT); 

pmlcfs < ACOSH_BADARC, COUNT) ; 



pinlcfs (ACOSH OVERFLOW, COUNT); 
pmlcfs ( ATANHJ1ADARG, COUNT) ; 
pmlcfs (ATAN_UNDERFLOW, COUNT); 
pmlcfs (C_DIV_ZERO. COUNT >; 
pmlcfs (CRCP l _OF_ZERO, COUNT); 
pmlcfs (DINT_2BIG, COUNT); 



gon_errors() 



I 



complex zl, z?; 



.\n>); 
l.OAn"); 
l.OAn"); 



zl.r - 1.0; 

zl.l - 0.0; 

z2.r - 0.0; 

z2.i - 0.0; 

printf ("Testing for exp overflow. \n") ; 

exp (100.0); 

printf ("Testing for exp underf low.Vn") ; 

exp (-100.0) ; 

print f( "Testing for scale exponent overf low. \n") ; 

scaled. 0, 500); 

printf ("Testing for scale exponent underflow. \n") ; 

scaled. 0, -500); 

printf ("Testing for sqrt argument < 0.\n"); 

sqrt (-1.0); 

printf {"Testing for In of zero.W); 

ln(O.D); 

printf ("Testing for In argument < 

In (-1.0); 

printf ("Testing for acos argument 

acos(2.0) ; 

printf ("Testing for asln argument 

asin(-2.0); 

printf ("Testing for tan overf low\n") ; 

tan(HALFPI); 

printf ("Testing for cosh overf low\n") ; 

coshfLNMAXPOSDBL ♦ 1.0); 

printf ("Testing for cosh underf low\n") ; 

cosh(LN_HINPOSDBL - 1.0); 

printf ("Testing for slnh overf low\n") ; 

sinhILN MAXPOSDBL ♦ 1.0); 

printf ("Testing for slnh underf low\n") ; 

slnh(LN_MINPOSDBL - 1.0); 

printf ("Test ing for asinh overf low\n") ; 

aslnh(2.0 - SQRT_MPDF); 

printf ("Testing for acosh argument < 1.0\n"l; 

acosh(O.O) ; 

printf ("Testing for acosh overf low\n") ; 

acosh(2.0 * SORTMPDF); 

printf ("Testing for atanh argument >■ 1.0\n"); 

atanh (-1.0) ; 

printf ("Testing for 4tan underf low\n") ; 

atan(RECIP_MAX) ; 

print f ("Testing for complex / 

cdlvUzl, tz2); 

prlntf ("Testing for corplex 1 

crcpUz2) ; 
print f ("Testing for dint 
part\n") ; 

dint (MAX POS DB(F) ; 
] 

EOF 



0\n") ; 

/ 0\n"); 

with no fractional 



FOR THOSE WHO 




68 MICRO 
JOURNAL 



J 



13 



January '88 



6a Moro Journal 




astc 





Dedicated to the serious OS-9 user. 

The fastest growing users group world-wide! 

6809 - 68020 



A Tutorial Series 



By: Ron Voigts 

2024 Baldwin Court 
Glendale Heights, IL 



GETTING IT GOING 

I am fascinated by how things get started. 
Eveiything has its origins. There is the origin 
of the universe. There is the origin of life. 
Computer systems have their origins too. 

Computer systems have their beginnings. 
Now I am not talking about the list of things 
that occur when starting up. These include 
putting in disk and doing something to cause 
it to bootup. Then, it loads everything into 
memoiy. Rather I am thinking about the ini- 
tial process that gets the system behaving as 
you would like to do. It is the operating system 
you expect. 

An earlier system that I worked with cen- 
tered around a Jump vector. • This was conve- 
niently located at an agreed upon place. When 
the system was initiated, it would place what 
was called a "warm start jump location" into 
this slot. If anything went wrong, it would al- 
ways return here and restart itself. When a 
program was loaded, a new "warm start jump" 
would be placed here. Say, I loaded Basic, it 
would stay in Basic, because the "Jump" vector 
was there. When I exited back to the system, 
the original "Jump vector" would be replaced. 

Things have come a long way. since then. 
OS-9 does a far better Job. It is in position In- 
dependent code and does not have a hard ad- 
dress to Jump to. And It is not a system that 
has only one process running. Processes 
spawn other processes. Sometimes many are 
started. But it all goes back to some initial 
process. That is the topic of this month. 

Two items must be briefly examined before 
we look at the process that starts thing going. 
One. we must look at is the sequence of events 
that occur when booting OS-9. Two. we must 
consider the file containing the vital parame- 
ters in booting OS-9. Neither of these will be 
examined in great details, but they are as a 
preliminary to our study. 



Initially some type of hardware reset oc- 
curs. This may be pushing a "reset" button, 
turning it on or a momentaiy power failure. 
What ever occurs, the OS-9 kernel goes into 
action. First it searches memoiy for ROM's. 
Next, it determines the amount of RAM avail- 
able. Then, necessaiy modules are loaded Into 
memory. These come from OS9Boot. Finally, 
the system startup task Is began. This is a 
module called SYSGO. short for SYStem GO. 
This module Is this months focus of attention. 

Now we know the sequence of events that 
set thing started. We next examine the module 
that contains the startup parameters. It is 
INIT. It is usually located in ROM with the OS- 
9 kernel. It has useful items like the upper 
limit of RAM memoiy. the initial standard 
I/O path string, number of entries in the sys- 
tem device table and the bootstrap module 
name. Two items of interest, it contains are 
the first module to be executed and the default 
directory name. The first module is SYSGO 
and the default is DO ( or maybe HO. it isn't set 
in stone ). 

INIT determines the first module to be exe- 
cuted. It is usually SYSGO. By the time that 
SYSGO is initiated, the default directory is 
/DO. One of these days I wi]l go deeper into the 
workings of INIT. Feasibly, these could be 
changed. As I pointed out earlier, if a hard 
disk were part of your system. HO could be the 
default. SYSGO could also be changed. But I 
have never seen anything else used. We*ll pro- 
ceed along with these. 

SYSGO does a number of things. The 
things that it accomplishes are: 

1. Change execution directory to CMDS. 

2. Set initial priority. 

3. Execute startup file. 

4. Start and maintain a running shell. 
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These are the most basic things lo do. 
They are accomplished In this order with the 
SHELL executed last. When SYSCO is finished, 
you will see the word "Shell" and the familiar 
prompt. Listing 1 is a bare bones version of 
SYSCO. 

An examination of it will prove to be en- 
lightening. 

Going to START, we see that the first thing 
it does is to set up a signal Intercept trap. Reg- 
ister X is loaded with the intercept routine's 
location. This is at INTRCPT.PCR. A call is 
made lo F$Icpt. This tells OS-9 where the sig- 
nal handler routine is located. Now whenever 
SYSCO receives a signal, it will go lo INTR- 
CPT. All that is located there is a RTT. return 
from interrupt. The intercept routine is 
entered and immediately exited again. 

Next the X register is loaded with a pointer 
lo the string "Cmds" and the A register is 
loaded with $04. used for setting the com- 
mands directory. A call is made to I$ChgDir. 
This causes the current execution directoiy lo 
become /DO/CMDS. Remember that the de- 
fault was already /DO. as determined at sys- 
tem boot time. So there is no need lo change 
the default working data directory. 

Third, the priority is set. A call is made to 
F$Id. which returns the process ID in the A 
register. The B register is loaded with $80. a 
middle priority value. And the call is made to 
F$Prior. The importance of this is that all 
processes FORKed from SYSCO will inherit its 
priority value. 

Now comes the execution of the STARrtJP 
file. Register X is loaded with a pointer to 
"Shell". Register U is loaded with a pointer to 
"Startup -p". The "-p" turns off the OS-9 
prompting, while "Startup" is being executed. 
Register D I A/B ) is loaded with $0100. The 
language type here is 6809 Object code. The Y 
register is loaded with the parameter area 
length. Here it is the length of "Startup -p". 
plus a trailing carriage return. A call Is made 
to F$Fork and the Tile /DO/STARrtJP is exe- 
cuted. A call is also made to F$Wait, so that 
SYSCO waits for the process to finish. 

Finally, the a SHELL is started using 
F$FORK. What is interesting is that should 
the SHELL die. another one will began. As 
long as no error occurs, this can go on forever. 
Try It yourself. Type <ESCAPE> or the 
<CLEARxBREAK> combination In the Color 
Computer. The SHELL will die and another 
one will start. Should an error occur, execu- 
tion continues and the error handler is 
executed. For this version of SYSCO Is a Jump 



10 the address located at $FFFE. If you 
examine the Color Computer version, it would 
appear as: 

ERROR bra ERROR 

This is of course an endless loop. If you are 
running OS-9 on the Color Computer and had 

11 hang up, you may have been In this loop. 

The intercept handler is a simple RTI or 
return from interrupt. I think of this as a 
shield. Should an Interrupt come in. it goes 
here. Nothing happens. It bounces oil and 
returns with the RTI. 

The Color Computer version also has a 
warm start routine that is copied into the first 
page of memoiy beginning at absolute address 
$0071. The routine is something like this: 

fcb $55 

fdb $0074 

nop 

clr >$FF03 

nop 

nop 

sta >$FFDF 

Jmp >$EF0E 

Much of this are the different Hags that are 
used. The CLR and STA routines turn off the 
timing interrupts and sets the Color Computer 
into the all RAM mode. The final JMP Is into 
the kernel. So if an reset occurs, this gets 
executed. 

We can sum up what SYSCO has done for 
us. It has done all of the high level system 
initialization. This is setting the commands 
directory, setting the priority level and 
executing STARTUP with a SHELL. It starts 
the first user program, which in our case Is the 
SHELL. And it goes Into a wait state, ready to 
restart the SHELL if necessary. 

The important thing to note here Is that it 
does system initialization. This is valuable, 
because it can be used lo alter the environment 
the system comes up In. Many times in the 
past we have used the startup procedure lo 
change things. Generally speaking, this is 
probably the simplest meihod. But SYSCO can 
do the same thing and it can do somethings 
that STARrtJP cannot. 

Listing 2 shows the same SYSCO of Listing 
1 with a few alterations. This listing Is more 
of an example. I would probably not use this 
one in my system. But it Is interesting and can 
show some things that can be done. 
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I added a startup message. This can be 
almost anything desired. Starling at 
MESSAGE are 3 lines telling: 

OS-9 SYSTEM LEVEL II BY MICROWARE 
CONFIGURED FOR STYLO START DP 
DEFAULT WORKING DIRECTORY IS /Dl 

Register X is loaded with the location of 
the message and register Y is loaded with the 
size. Loading register A with the standard 
output path, a call is made to I$Wrile. Pool! 
There is the start up message. 

The next addition is to set the working 
directory to /Dl . This is done by loading the X 
register with the location of "/D 1" and loading 
A with the $03 for read and write privilege. A 
call to made to I$ChgDir. Now the system will 
default to /Dl. This is something that could 
not be done from the procedure STARTUP. I 
have heard a number of time from users who 
have tried adding a line like : 

CHD/D1 

to STARTUP. They were discouraged when 
they learned it would not work. The reason Is 
that when the SHELL dies which was executing 
the start up procedure, everything it changed 
is gone loo. By putting It in SYSGO the change 
will last and get passed on to children of the 
process. 

The final change I added to SYSGO is to 
have it start STYLO. This was done by loading 
X with the location of "STYLO". Executing 
F$Fork, SIYLO will be up and running. Notice 
that 1 did not substitute STYLO for the final 
start up of the SHELL. Otherwise, we could 

find ourselves in an endless loop of SIYLO 
executions. In this case. STYLO starts once. 
After that. SHELLS will begin like usual. So. it 
would not be necessaiy to restart the system or 
use SIYLOs feature. PASS, to start a SHELL. 

As I said earlier this Is only an example. I 
probably would not use anything like this. 
First, the startup message could easily be put 
into STARrUP using ECHO to write the 3 lines 
to the CRr screen. Coming up into /Dl Is not 
all that useful. 1 would be changing to another 
working directory, since i have sub- 
directories on my disk. ( Also, the drive comes 
on and I have to search for something to stick 
into It. ) And finally, if I really wanted SIYLO 
to come up immediately, I would add the 
following line to STARTUP. 

STYLO </TERM >/TERM 



But there are many reasons you might 
want to customize SYSGO. imagine you are a 
game developer. You might want to have some 
type of notice printed to the CRF. It would 
contain the game name, copyright notice, and 
a maybe some brief instructions. Instead of a 
SHELL executing, the game could be made to 
execute. If an escape occurred, the game would 
re- execute. 

I have toyed with the Idea of creating a 
SYSGO for my Level i system and the RAM 
disk I use. The RAM disk could be formatted 
and directories copied to It from /DO by 
forking to format and directory copying 
programs. Just before the final SHELL Is 
executed, directories could be changed to 
/R/CMDS and /R When the SHELL comes up. I 
would be in the RAM disk and ready to go. 

What if you have a ROMable system with 
no disk drives? Maybe the system Is a 
controller for automated process. Initializing 
directories and processing STARTUP will 
have to go. Instead of the SHELL, the main 
control program would be forked to. Even a 
number of processes could be chained 
together. When one Is finished the next one 
would start. 

The possibilities are almost endless. In 
many instances altering the startup procedure 
Is sufficient. But many applications require 
SYSGO to be customized. If you have any urges 
to do something different, try your hand at 
customizing SYSGO. 

That is it for now. Take care. Until next 
time, have fun! 



nan SYSGO 
ttl System's 



LISTING 1 

00001 
00002 
First Process 

00003 .*.«•...«*•*..*..**..*....***...*.. 

00004 * 

00005 * SYSGO for OS9 Level II 

00006 * Generic Version 

00007 * T-SEP-87 
00008 

00009 ................................... 

00010 

00011 * Function: 

00012 * System startup procedure. 
This 

00013 * version does what Is 
necessary 

00014 * start a SHELL. 

00015 • 

00016 ................................... 

ooon * 

00018 * Version 1.0 Original. 

00019 * 

00020 ................................... 

00021 • 

D0022 tfPl 
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00025 


endc 


00096 * If no errors occurred, do another 


00026 




00097 006B 24EB bec DoShell 


00027 


0011 TYPE set 


00098 


PRGRM*OBJCT 


00099 * Else we bail out and start over 


00028 


0001 REVS set. 1 


00100 W 006D 6E9FFFFE ERROR jmp [SFFFE] 


00029 




00101 


00030 


0000 87CD0075 mod 


00102 * Intercept handler 


PGMEND, NAME, TYPE, REVS, START, MEMSIZE 


00103 0071 3B INTRCPT rti 


00031 




00104 


00032 


* stack size 


00105 0072 C9ED7B eraod 


00033 D 


0000 org 


00106 


00034 D 


0000 rmb $100 


00107 0075 PGMEND equ • 


00035 D 


0100 MEMSIZE equ 


00108 


00036 




00109 0075 end 


00037 


* Module name 


00110 


00038 


000D 53797347 NA>E fcs /SysGo/ 


00111 


00039 


0012 02 EDITION fcb 2 




00040 




00000 error(s) 


00041 


* Commands directory located on /DO 


00001 warning(s) 


00042 


0013 CMDS equ * 


$0075 00117 program bytes generated 


00043 


0013 436D6473 fee "Ciuds" 


$0100 00256 data bytes allocated 


00044 


0017 0D fcb CSCR 


$1411 05137 bytes used for symbols 


00045 






00046 


« OS-9 Shell 


LISTING 2 


00047 


0018 SHEI.L equ * 




00048 


0018 5368656C fee "Shell" 


00001 nam SYSGO 


00049 


001D 0D fcb CSCR 


00002 ttl System's 


00050 




First Process 


00051 
00052 


* Startup procedure name 
D01E STARTUP equ * 


00003 




00053 


001E 53746172 fee "Startup 


00004 * 


-P" 




00005 * SYSGO for OS9 Level II 


00054 


0028 0D fcb CSCR 


00006 * For Booting into Stylo 


00055 




00007 • 18-SEP-87 


00056 


* Execution entry for SysGo 


00008 • 


00057 
00058 


0029 START equ ■ 


00009 




00059 


* Set up for Intersept handler 


00010 * 


00060 


0029 308D0044 leax 


00011 * Funtion: 


INTRCPT 


,PCR 


00012 * System startup procedure. This 


00061 


002D 103F09 os9 FSIcpt 


00013 * version prints a startup message. 


00062 




00014 * defaults to /Dl and initially 


00063 


* Change Commands directory 


00015 * enters STYLO. 


00064 


0030 308DFFDF leax CMDS.PCR 


00016 * 


00065 
00066 


0034 8604 Ida i$04 
0036 103F86 os9 ISChgDir 


00017 




00067 




00018 • 


00068 


* Get this process 1 ID 


00019 * Version 1.0 Original. 


00069 


0039 103F0C os9 FSId 


00020 * 


00070 




00021 * Version 1.1 RDV 


00011 


* And use it to set its priority 


00022 * Modified to start STYIO and 


00072 


003C C680 ldb 1S80 


00023 * change to working drive to /dl 


00073 


003E 103F0D os9 FSSPrior 


00024 


00074 
00075 


• Using the shell, execute STARTUP 


00025 




00076 


0041 3080FF03 DoStUp leax SHELL. PCR 


00026 * 


00077 


0045 338DFFD5 leau 


00027 if pi 


STARTUP 


,PCR 


00032 endc 


00078 


0049 CC0100 ldd IS100 


00033 


00079 


004C 108E000B ldy IS0B 


00034 0011 TYPE set 


00080 


0050 103F03 os9 FSFork 


PRGRM+OBJCT 


00081 


0053 2518 bes ERROR 


00035 0001 REVS set 1 


00082 




00036 


00083 


* Wait for it to end 


00037 0000 87CD010C mod 


00084 


0055 103F04 os9 FSWait 


PGMEND. NAME, TYPE, REVS , START. MEMSIZE 


00085 




00038 


00086 


• Startup a SHELL 


00039 * stack size 


00087 


0058 308DFFBC DoShell leax SHELL, PCR 


00040 D 0000 org 


00088 


005C CC0100 ldd HS100 


00041 D 0000 rmb $100 


00089 


005F 108E0000 ldy IS00 


00042 D 0100 MEMSIZE equ 


00090 


0063 103F03 os9 FSFork 


00043 


00091 


0066 2505 bes ERROR 


00044 * Module name 


00092 




00045 000D 53797347 NAME fcs /SysGo/ 


00093 


* Walt for it to end 


00046 0012 03 EDITION fcb 3 


00094 


0068 103F04 os9 FSWait 


00047 


00095 




00048 * Starting message 
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00049 


0013 MESSAGE equ * 00111 


00C4 CC0100 ldd 


• S100 


00050 


0013 4F532D39 fee "OS-9 0112 


00C7 108E000B ldy 


IS0B 


SYSTEM 


LEVEL II BY KICROVARC" 00113 


00CB 103F03 os9 


FSFork 


00051 


0035 0D0A feb CSCR,CSLF 00114 


0OCE 2534 bes 


ERROR 


00052 


0037 434F4E46 fee 00115 






"CONFIGURED FOR STYLO STARTUP" 00116 


• Wait for it to end 




00053 


0053 0D0A fcb CSCR.CSLF 


00117 


00D0 103F04 os9 


FSWalt 


00054 


0055 44454641 fee "DEFAULT 


00118 






WORKING 


DIRECTORY IS /Dl" 


00119 


* Set the ttorking drive to 


/dl 


00055 


0075 0D0A feb CSCR.CSLF 


00120 


00D3 308DFFAS 


leax 


00056 


0064 MS12E equ «-MZSSAGE 


WDRIVE 


PCB 




00057 




00121 


0OD7 8603 Ida 


tS03 


000S8 


* Coirmanda directory located on /DO 


00122 


00D9 103F86 os9 


ISChgDir 


00059 


0077 CMOS equ * 


00123 






00060 


0077 436D6473 fee "Cmds- 


00124 


• If no errors occurred, do another 


00061 


007B 0D f c b CSCR 


00125 


00DC 308DFFB1 DoStylo leax 


STYLO, PCR 


00062 




00126 


00E0 CC0 100 ldd 


IS100 


00063 


• Working Drive 


00127 


00E3 108E0000 ldy 


ISO 


00064 


007C WDRIVE equ • 


00128 


00E7 103F03 os9 


FSFork 


00065 


007C 2F4431 fee "/Dl" 


00129 


00EA 2518 bes 


ERROR 


00066 


007F 00 fcb CSCR 


00130 






00067 




00131 


• Walt for it to end 




00068 


• OS-9 Shell 


00132 


00EC 103F04 os9 


FSWalt 


00069 


0080 SHELL equ * 


00133 






00070 


0080 S368656C fee "Shell" 


00134 


• Startup a SHELL 




00071 


0085 00 fcb CSCR 


00135 


00EF 308DFF8D DoShell leax 


SHELL, PCR 


00072 




00136 


00F3 CC0100 ldd 


IS100 


00073 


* Startup procedure name 


00137 


00F6 108E0000 ldy 


IS00 


00074 


0086 STARTUP equ • 


00138 


00FA 103F03 os9 


FSFork 


00075 


0086 53746172 fee "Startup 


00139 


00F0 2505 bes 


ERROR 


-p. 




00140 






00076 


0090 0D -feb CSCR 


00141 


• Walt for it to end 




00077 




00142 


00FF 103F04 os9 


FSWait 


00078 


• STYLO name 


00143 






00079 


0091 STYLO equ * 


00144 


' If no errors occurred, do another 


00080 


0091 5374796C fee "Stylo" 


00145 


0102 24EB bec 


DoShell 


00081 


0096 0D fcb CSCR 


00146 






00082 




00147 


* Else we have an error 




00083 


* Execution entry for SysGo 


00148 


W 0104 6E9FFFFE ERROR jmp 


ISFFFE] 


00084 


0097 START equ • 


00149 






00085 




00150 


* Intercept handler 




00086 


* Set up for Intercept handler 


00151 


0108 3B INTRCPT rti 




00087 


0097 308D006D ■ leax 


00152 






INTRCPT 


,PCR 


00153 


0109 3F3264 eirad 




00088 


009B 103F09 os9 FSIcpt 


001S4 






00089 




00155 


010C PGMEND equ 


* 


00090 


• Print message 


00156 






00091 


009E 308DFF71 leax 


00157 


010C end 




> MESSAGE, PCR 


00158 






00092 


00A2 108E0064 ldy JMSIZE 


00159 






00093 


00A6 8601 Ida 11 








00094 
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• Change Commands directory 
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• And use it to set its priority 
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• Usiig the SHELL, execute STARTUP 
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Example 3 is the most complicated clrcult-wlse. so I'll Just take time out lo explain Its 
action In the Flow-Table above. Initially we have a stable condition In the top-left square (Loca- 
tion 0-000). with both lights OFF. So It's up to us to get something to happen by pressing 
push-button X. This moves us to the right Into location 1-000. where we see that Light- 1 comes 
ON simultaneously with the coll of Y2 becoming energised. The code 010 in Box -A now makes 
this location unstable, so circuit-action forces us down to Location 1-010. where the cicuil 
once more becomes stable, with Hght-1 remaining energised. From now on. we'll make every 
effort to refer to "location" by its more modern equivalent "address", and "code" by Its equiva- 
lent "instruction", where appropriate. Once again, its up to us to get something different going, 
so we release X. which moves us tnto address 0-010, with Light- 1 remaining ON. but Relay 
Y3's coil becoming energised. However, this address is unstable (why?) and we are forced 
downwards to address 0-01 1. where Relay Y3 becomes de-energised and cuts off Light- 1. at the 
same lime turning Light-2 ON. This address, too. is unstable, sending us back up to address 0- 
010, then back down again to address 0-011. and so on, and so on. and .... In this oscillatory 
condition. Y3 alternately becomes energised and de-energised, causing Lights 1 and 2 to 
alternate in synchronism. And so It will continue, unless we choose to interrupt il once more! 

Let's assume we happen to hit button X Just as circuit-action places us In address 0-010. 
We'll immediately move lo the right, and stay there in a stable slate with Light- 1 ON. So lei's 
release X once more, and relum to our previous oscillations. Wilh a little bit of luck we eventu- 
ally manage lo hil X Just as the circuit moves into address 0-01 1, which, of course, pops us to 
the rlghl into address 1-01 1. where Relay Yl now becomes energised for the first time, and also 
BOTH llghls are turned ON. This address turns out lo be unstable, and we are pushed down to 
address 1-1 10. entering a stable state once more wilh both lights remaining ON. 

If we now release X, we'll move left lnlo address 0-1 10. where the lights remain ON, but Yl 
becomes de-energised, Ihus setting up the instruction 010. So once more we're unstable, and 
are compelled to pop up to address 0-010. where Lighl-2 turns OFF and we ilnd ourselves back 
in our earlier oscillations. 
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I hope you didn't find the last Test TOO DIFFICULT. If you'd like me to go Into explana- 
tions of a few more examples al any time during this series, please write and let me know. Or 
maybe you can form a study-group with some of your friends. After all. two heads, so they say, 
are a lot better than one!! 

Anyway, if we're all ready and eager to get going, lei's move on lo Mile 6. 

Here's what we've all been looking forward to!! 

THE SYNTHESIS OF SEQUENTIAL CONTROL CIRCUITS 

Our experiences with Flow-Tables to Ihls point should have made it apparent that Ihe 
Table accurately describes the ACTION of the circuit undergoing analysis, both In terms of the 
relays controlling the action and of the output devices being controlled. Although it does not 
give us a picture of the circuit-network Itself, neveilheless 11 MUST in some way have some sort 
of relationship lo it. After all, we found with ordinary Boolean algebra that we could translate a 
circuit Into a Boolean expression, and we could also reverse the process. Similarly with K-maps. 

In the case of sequential circuits, we now know how to translate a circuit diagram into a 
Flow-Table, and if only we could change this back into a circuit once more we'd feel a lot hap- 
pier. Well, there is a way to do Just that, and this Is where our Box-B In each square (unused till 
now) comes Into the picture! 

A MORE DETAILED LOOK AT THE FLOW-TABLE 

But first, let's think this thing out a little more deeply! We're now in a position to see that 
Box-A tells us what action the circuit Is going lo take - - if the code there matches that to the 
left, then the circuit will remain stable in this position. On the other hand, if the numbers do 
NOT match, we nol only know lhal the circuit Is unstable, but we know PRECISELY where it's 
going next. It will go lo the row called out by the instruction in Box-A. When it gets to this new 
row. It will "read" and cany out the Instruction contained in the new Box-A. In moving around, 
the outputs (whether they be lights, electric motors, heaters, or anything else) will be forced to 
change In accordance with the codes contained In Box-C. They themselves, however, play no 
part In deciding where the circuit action Is going next - they simply tag along for the ride. 

This means that If we wished we could MAKE Ihe flow-table action move where WE want it 
to go. simply by Inserting Ihe desired Instruction in Box-A. If we wished the action lo slop at a 
particular row. all we'd have to do would be to put a number in Box-A which agrees wllh the 
row-number, or, if we wished it lo move lo another row we'd Insert Instead the number of the 
desired row. At the same lime we'd fill In the Box-Cs wllh codings describing what we wished to 
happen to the output devices. Having done all that, we would then complete the Box-Bs in a 
manner to be described soon, et volla - - provided we haven't made any mathematical errors 
along the way. here we have a circuit which behaves in exactly the way we want it to. Sounds too 
simple to be true, doesn't 11? 

SEQUENTIAL CIRCUIT SYNTHESIS - EXAMPLE ONE 

I think Ihe best way lo demonstrate the basic technique is to start right at the beginning 
with a brand-new set of specifications, and take 11 a step al a time. Our first example wUl be a 
very simple one. OK. you guys, which one of you Just sighed "Thank goodness for that!"? Any- 
way, without further ado. let's assume we have a customer who requires a relay control-circuit 
for a light, LI. which Is OFF initially, such that when button X Is pressed LI comes ON and 
slays ON even when X Is released. When X Is pressed a second lime LI is lo go OFF and stay 
OFF when X Is released. II Is lo come on again when X is pressed a third time just as It did the 
first time, then OFF. and so on. 

First of all. we draw up a blank flow-table, as shown In Diagram 17a. allowing two columns 
for the prlmaiy control X (one for X=0 and one for X=I) and an uncertain number of rows for the 
secondaiy controls, which we number consecutively from 1 onwards. In our example. I num- 
bered from 1 lo 5. although, as 11 turns out, only 4 rows are needed. We use decimal numbers 
for two reasons - - one being because al this stage of the game we have no idea how many relays 
we're going to need, and so we can't insert a binary coding as we've been accustomed to do 
during analysis. The second reason Is that our whole design technique is based on using deci- 
mal numbers, and this Is as good a lime lo start using them as anywhere else. 
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Diagram 17 



According to our specs. LI has to be OFF Initially, and. of course. It's understood to be a 
stable state. Therefore. In the lop-left address 0-1 (which Is ALWAYS our starting-point), we'll 
Insert a T In Box-A to keep the circuit stable and a "0" In Box-C to keep LI OFF. In case there's 
still some lingering doubt about the entry In Box-A, remember the rule that In order to make a 
particular address stable the Instruction In Box-A MUST agree with the coding outside the table 
to the left. 

Having disposed nicely of the starting, or switch-on. conditions, let's turn our attention to 
the next part of the specs, namely that when we press X. LI has to come ON and stay ON even 
when we release it. Obviously, pressing X moves us to the right into address 1-1. Now. we 
COULD insert a 1 in both Boxes A and C. which would take care of the part which says "LI to 
come ON when X is pressed", except that when we then release X we'd just slide back to the 
left into our starting address, and LI would go out again. 

There's no doubt then that we have to move to another row. so we Insert the Instruction 
'2' In Box-A (forget about Box-C for the moment) and move downwards to address 1-2. where 
we Insert another 2 In A to keep things stable while we're holding on to button X. and a 1 In C 
to make LI come on. Now let's go back to Box-C in the row above, keeping In mind the follow- 
ing three facts : 

(a) Phi's are VERY useful to us. The more of them we have, the more scope we have to 
minimise our network. 

(b) A vertical movement in the table Indicates that a secondary control has operated, that 
Is. a relay, which means that, time-wise, addresses 1-1 and 1-2 are about 1/ 100th of a second 
apart (substantially less if we were using solid-state devices Instead). 

(c) Although the specs DO say that LI has to come ON when X Is pressed. It Is obviously 
not the Intention of our customer to distinguish precisely between the EXACT moment that X 
Is pressed and a moment about 1/ 100th of a second later. 

We'll therefore insert a phi in this spot, and decide later, when developing a minimum 
circuit, whether to definitely settle for 1 or 0. 

Continuing then, and benefitting from our experience with this first movement, we'll code 
address 0-2 with a 3 In A when we release X. and also In address 0-3. where we come to rest 
In a stable state. In both addresses we'll code Box-C with a 1 to keep our light ON. So far so 
good! Our Ilow-table to date reflects the Intention of the specs very nicely up to the end of the 
first ON-OFF operation of button X. 

The rest is fairly simple - - the pattern Is exactly the same as that up to this point, except 
that the condition of LI Is reversed. That is. It's now changing from 1 to 0. instead of from to 
1. Observe too that we do not keep the flow-table going on and on. as the specs make it quite 
clear that at the end of the second ON-OFF operation of X we should be right back at the start 
of the cycle. We achieve this by coding address 0-4's Box-A with a 1 , which shoots us up to the 
original stable starting-point. 

We can now say that our How-table Incorporates the proper sequence of actions called for 
in the specs. Including the correct switching ON or OFF of LI at the appropriate points In the 
cycle - apart from the two phi's. 
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CIRCUIT HAS NOW BEEN DESIGNED 

Believe It or not. but we have also designed our etrcuit. Just as with K-niaps. ONCE 
WEVE SUCCESSFULLY CODED THE SPECS WEVE ALSO DESICNED THE CIRCUIT. AH we 
have to do now (doesn't that sound simple "ALL we have to do ...?) Is to read out the etrcuit 
diagram from the flow-table. Don't go rushing madly down the trail yet though. We still have a 
MUle work to do before this happy slate of affairs can result. One thing for sure - even though 
we haven't the least Idea yet as to what the circuit will look like - we can state that we can 
achieve these effects by ustng only two relays, which we'll call Yl and Y2. How can we tell this 
from the flow-table? Very simply! 

Remember that the foundation of our digital system of design (even though we use deci- 
mal numbers for convenience) is the binary system of counting. So all we do Is to ask our- 
selves "What power of 2 will cover the number of rows In the table?" 2 A 1 = 2 and will cover up 
to 2 rows. 2 A 2 = 4 and will cover up lo 4 rows. 2 A 3 = 8 and will cover up lo 8 rows, and so on. 
In our example, where we have 4 rows. 2 will have to be raised to the power of 2 (producing 4| 
In order lo cover this number. We'll elaborate on all Ihls in a later example, bul before finally 
committing ourselves lo this figure (It COULD possibly turn out to be less) we check the Box- 
As. row by row. one against the other. For example, in row I the Box-As contain the Instruc- 
tions 12; In row 2 Ihey contain 32; In row 3. 34; and in row 4. 14. These number-pairs are all 
different, and Ihls lells us lhal we are definitely lied to 4 rows and thai we WILL definitely 
need 2 relays. As I've already mentioned, we'll go inlo this further in a short while. 

THE STATE-DIAGRAM 
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The flrsl stage In the translation of the flow-table lnlo a ctrcuil-dlagram is to construct 
what Is known as a "slate diagram", which Is shown In Diagram 18. 



Dioaram 18 



It consists of a set of boxes. Identical with those of the flow-table, separated from each 
other by about 1 /2 Inch. In Box-A of each major box we Insert Ihe state-numbers through 
which the machine cycles (In our case 1-4), and conned the major boxes together by arrows lo 
duplicate the acllon-flow In Ihe flow-table. In our example, we commence In Stale 1. then (as 
the flow-table shows) we move lo State 2. from there to Stale 3. Ihen to State 4. and finally 
back to State 1 again. 

Now. In Box-C of each Slate-box. we're going to Insert a 2-bit binary code (1 bit for each 
relay In our circuit). The coding will be such lhat if any two boxes are connected by an arrow 
Ihe code will differ in ONE bll-posiUon only. In olher words, we're going lo Cray-code Ihe Slale- 
dlagram. For now. we'll accept this as a facl-of-llfe. bul later on we'll look at Cray-codes In more 
detail in order to understand why they're absolutely essential lo reliable circuit design. By con- 
vention, we always code Box-1 with an all-zero code. 

When ail Ihe boxes have been successfully coded, we Insert in Box-B of the State-diagram 
the decimal equivalent of these binaiy numbers, preferably In a contrasting colour. 1 mentioned 
a long way back on our journey that I use "red", but will distinguish Ihem wllh a lighter Impres- 
sion than the instructions in Box-A. even though I shall refer lo Ihem as "red-5". "red- 19". etc. 

We now have a lolal of three controls in this circuit - one primary control X and two secon- 
dary controls Yl and Y2. which we set oul as shown below, with headings according to the 
binaiy numbering system. The primary controls are ALWAYS set out first, and Ihen the secon- 
dary controls to the righl. Thus : 
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We can now add a heading to our flow-table rows, namely yly2. and In the appropriate 
rows the red numbers from our State-diagram. 
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Diagram 14 



Row 1. according to Box-1 of the State-diagram, corresponds to a red-O. row 2 to a red-1. 
row 3 to a red-3. and row 4 lo a red-2. You 11 see that a few lines earlier on. we allocated the bit- 
value 4 to X. so we add a red-0 to column 0. and a red-4 to column 1 (where X = 1). To round 
off the completion of the flow-table, we finally fill In all the Box-Bs In the table with a red 
number corresponding to the sum of Us co-ordinates. That Is. address 1-2's Box-B has a red-5 
Inserted because It Is also located In Column red-4 and row red-1. and 4+1 = 5. and so on for 
the other addresses. 

It's actually the red numbers scattered throughout the flow-table which contain the cir- 
cuit-diagram, and these we'll read out according to different sets of rules, depending on 
whether our circuit Is going to be composed of relays or solid-state (with slightly different rules 
If we're going to use an all-NOR Implementation, or an all-NAND. and so on - but that's quite a 
way down the road yet!) 

A STUDY OF FLOW-TABLE DATA 

Before we actually do the decoding, however, let's take a final look at the flow-table to see 
what a WEALTH of information It now contains. For instance. Box-A not only tells us whether 
the circuit Is stable or not at this point, but If it's unstable It tells us exactly where the action is 
going to move. IN ADDITION, it gives us the state of magnetisation of ALL the relay colls in our 
circuit. Let's for a moment pick out address 0-2. Box-A tells us (a) that the circuit is unstable 
here, (b) that It's going to move next lo row 3, and (c) because code-3 refers us to Box-3 of our 
state-diagram, we can find out that current is flowing through the coll of both Yl and Y2. this 
information being available in both decimal and binary. 

Box-B of address 0-2 gives the state of ALL the controls (NOT the coils themselves). In this 
case the red-1 (binary 001) tells us that X is NOr operated, that Yl's CONTACrs have not yet 
operated, but Y2's have. Comparing this number with that In Box-A. we can Immediately see 
why the circuit is unstable, in that Y I 's coil is energised but its contacts have not yet operated, 
and we know then that the next move is for them lo close In about 1/ 100th of a second, when it 
actually moves to row 3. Added to all this data. Box-C tells us that L 1 Is ON at this moment. 

Don't confuse the boxes in the stale-diagram with those In the flow-table. They are quite 
different! The only thing they have in common Is Box-A. Box-B in the flow-table gives the state of 
all the control contacts, while that in the state-diagram gives. In decimal code, the state of 
energisation of all relay-colls (which is not necessarily the same as that of their contacts). Box-C 
In the flow-table gives the state of all output devices, while that of the state-diagram merely gives 
the binary equivalent of Its corresponding Box-B. 

One final word, and that is that ANY circuit cycling in the sequence shown in our stale- 
diagram, irrespective of the outputs involved. WILL HAVE THE SAME CONTROL CIRCUIT for Its 
relays. We are free to put any pattern of output, or outputs, in Box-C. without affecting Box-A or 
Box-B. which contain the key to the control-circuit for the relay network. 
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NOW TO ACTUALLY DECODE THE FLOW-TABLE 



The THEORY of the decoding system is too complex to permit of explanation In this tutorial, 
but the basis of the system used here may be found in the book "Digital Computer and Control 
Engineering" by R. S. I^edley. published by McGraw-Hill. i960, pages 336 to 343. This Is an 
excellent book, which covers a wide-ranging field, and which was instrumental In converting me 
to the decimal system of design which I am here developing for your benefit. 

Oh-oh! I think I've already used up my allocation of space in 68MJ, so I think we'll just have 
to recuperate here for a while. And guess what, you lucky readers? We haven't covered enough 
new ground for me to give you a meaningful test!! So you get a whole month with nothing to do 
but wait for details on how to do the circuit-decoding. Hope you can hang on till then. 

End of Mile 5. ready and eager for Mile 6. 



EOF 



Corrections: July '87 - 



Pg. #43, expiession at bottom of page should read: 
40 K% = ASC(MID$(N$.I%.l)-48+7*(K%>9)) 



Next line down: should read - "I use +7 to subtract 7. 



Pg. #47. "UNDERRFLOW" should read "UNDERFLOW" 
August 87- Pg. tt para 3. line 3: AJ£ + C_ should read AB+C 

5: 5 OR B OR C should read A_OR E.AND £ 

August '87 

Page 41 - fig. (il). y4' should have a diagonal 
bar to indicate "variable". 



September '87 

Page 23 - Rule 3 Series Circuit, 0.a=0 not =a. 

October '87 

Page 40 - 2(a) should read "Y" not "Yl" 
Page 40 - 3(e) second (e) should read (Q. 
Page 42 - "b" should read -0-- not -1-- 



O.K. folks, now thumb back to page #38: the switch shown should indicated that the 
"<hrouT should indicate that both elements throw on toggle. 
TEST ONE: 2(u) - the output circle should be marked Y, 

Now slide your eyes up near the top of the same page. A 1 = y +y2 should read AI=yi +y2 
Also please Ignore any "*" Included in any of the other listings. 

Sorry *bout all that - but you know - learning curve! DMW 
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I missed another month! With a trade show to attend 
in Germany, and intense work on ihc 68020 Pascal, it's 
sometimes hard to keep up with a monthly magazine 
deadline. The October deadline Tor the December issue 
came and went before 1 realized it. 

One of the most importan t abilities of OS-9 is multi- 
tasking. In this chapter we will look at two different ways 
fordoing multi-tasking from Pascal. 

The first method is to generate a Pascal program for 
each task and link it into an OS-9 memory module. The 
Main task would then "Fork" the other tasks that arc re- 
quired. Data can be passed through Pi pesor through data 
modules. Synchronization of tasks can be done using 
events or signals. 

In many cases this method is perfectly satisfactory, 
especially where each task is a sizable program in itself. 
Using the 66000 Compiler each program would require 
a copy of whatever luntimc library routines it might need 
(such as floating point or I/O support), which could add 
a significant overhead to each program. This option 
becomes more appealing when Ihc 68020 compiler is 
released, since it has the option of using traps to access 
luntimc routines, thus the ability to share a common 
luntimc library. The only problem with this method is 
that using i/aps to call library routines results in a speed 
penalty. 

Many multi-tasking applications require many small 
tasks, possibly dealing with diverse I/O pons. For these 
types of applications, there is a method of having two or 
more tasks within the same Pascal program. 

The method used is an extension called 'TASK" pro- 
cedures. Note that these task procedures arc not specific 
to OS-9, you can use any multi-tasking kernel. The OS- 
9 package includes interface routines for OS-9, but these 



can be rewritten for just about any multi-tasking envi- 
ionmcnt. 

As an example of this method, we will look at an 
excerpt of code from the "Pascal Shell". This is a menu 
driven program, described earlier, that keeps track of a 
particular Pascal project for you. One of the features of 
the Pascal Shell is the ability to select one or more Hies for 
compilation or assembly and have those done in back- 
ground, thus allowing you to edit another file in fore- 
ground. 

There is a common data structure that must be accessed 
by the foreground environment and the background, this 
is the linked list of file names. This linked list has the 
structure : 

type 

file_type » (pascal, assembly, include) ; 
files - record 

link : "files ; 
options : integer ; 
class : file_type ; 
modified : boolean ; 
name : string [40) 
end ; 
optlist » record 

ink 

ptnum 

pt string 



: A optlist 


t 


: integer 


• 


: string 






end 


var 




fbase : 


-files 


obase : 


*onext 



When the "shell file" is read in, each name is entered 
into the "files" linked list and marked as to whether it is 
a pascal source file, an assembly language source file, or 
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an include (ile (or other type of file). Variable "fbasc" has 
the start or the linked list 

When a background chain is started in tlic Pascal 
Shell, it is started as a new task so the Pascal Shell can 
continue on as before. The background chain first opens 
the standard input, output, and error paths for ihc com- 
pilations and assemblies to use. The standard input and 
error paths arc opened to the device "/nil", which indi- 
cates that they arc not used. The outputpath, which is used 
by the Assembler and Linker for any sign-on messages is 
redirected to a file having the name "back_xxxx" where 
xxxx is the current task ID. This guarantees that multiple 
users on the system will not be writing to the same file, 
since tltc task ID is unique per user. 
The background tusk then scans the file list for files to be 
compiled orasscmblcd. These arc indicated by hav ing the 
"options" field set non zero. Thisoptions field is a unique 
number corresponding to a set of compilation/assembly 
command line options selected from a menu by the user. 
These would indicate for example, if you want to generate 
code for ihc debugger, or for linking, and whether or not 
you want a listing. When it finds a file that has a non-zero 
"options" field, it searches the options linked list until it 
finds a match with the "opinum" field. It then uses the 
siring associated with this option for command line 
processing. 

It then calls a proccduic called "shell" that handles start- 
ing the compiler or assembler, and then waiting for it to 
finish. Ibis same procedure is also used by the fore- 
ground to call the cditoror other utility, since a procedure 
can be shared by more than one task. Wlicn ihc back- 
ground task inns out files, it simply continues to ihc end 
of ihc task procedure, which automatically terminates the 
task. 

Now lets get to some spec ifics on task procedures. As 
far as the compiler is concerned, the only difference 
between a regular procedure and a task procedure arc in 
the runtime libraiy routines it calls. When inside a task 
procedure (including nested procedures), the following 
runtime calls arc modified : 

Procedure setup Procedure end Nested procedure 
start Mcmavail function New, Dispose, Mark, and Re- 
lease procedures 

The proccduic setup for a task proccduic is responsi- 
ble for actually starting the task and reluming to the 
caller. The procedure end will tcnninaic the task. The 
nested procedure start is different from a noimal proce- 
dure start routine only in stack checking. Ihc mcmavail 
function is different because you have the option of using 
a task 'sown heap area, or the global heap. Likewise with 
the New, Dispose, Mark, and Release procedures, they 
m ustac tci thcron the local task's heap, or thcgloba 1 heap. 



Why the option of two heaps? If you arc building 
structures thai arc no longer needed once the task termi- 
nates, then you would use the local heap to avoid fiag- 
menting the global heap. On the other hand, if you arc 
building structures on the heap that need to remain after 
the task is terminated, or need to be shared by multiple 
tasks, then you would want to use the global heap. 

There arc a number of task procedure parameters that 
arc absolutely required for any given implementation of 
multitasking. These parameters must be the LAST pa- 
rameters, however user-defined parameters may be de- 
fined before ihc required paiamcicrs. Making ihc re- 
quired parameters LAST guarantees that they arc a fixed 
offset from the procedure stack mark. Likewise, certain 
local variables must be defined FIRST for the same 
reason. 

For the implementation under OS-9, the following 
parameters arc required : 

1) Task name, must be unique in system, defined as 
"name : siring|32|" and must be set by ihc caller. 

2) Task stack size, stack size to be used by new task, 
would also include the local task's heap, if enabled. De- 
fined as "siacksizc : longhcx", must be set by the caller. 

3) Task module header buffer, 256 bytes long, nor- 
mally defined asarray 1 1 ..256] of byte on the global stack. 
Ihc address of this buffer is passed by the caller, since it 
is defined as "header : longhcx". 

4)Numbcrofl/Opaihstocopy from thccallcr task. As 
best as can be determined, this parameter, if non-zero, 
will start with the caller's path (siandaid input) and copy 
this path to ihc new task. For example : IOPATHS = 2 
would copy the standard input and standard output to the 
new task. IOPATHS = 6 would copy paths through 5 
from ihc caller to the new task. What if you only want to 
copy path number 5 to the new task, but not 0-4. 1 don't 
know, ask Microwarc. Defined as "iopaths : integer". 

5) Priority of new task, I - 255. On my 68020 system 
everything seems to have a priority of 128, 1 gave the 
background task a priority of 100 and this seems to work 
ok, only occasionally slowing down the editor in fore- 
ground while compiling in background. Defined as 
"priority : integer". 

6) ID of new task. This is not set by the caller, bui is 
set when the new task starts up. This allows the caller 
(parent) to send signals to the new (child) task by ID 
number. Defined as "var ncwid : hex". 

7) Tasking cnor. This is not set by the caller, but is set 
non-zero by the new task if there is an error, such as not 
enough memory, heap overflow, etc. Defined as "taskcrr 
: hex". 

8) Global/local heap flag. Set by the caller to tell the 
task which heap to use. True will use Global heap, false 
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will use local heap. This variable can be modified by the 
lask ilsclf. bul be careful lhal youdon'iallocalcoffofonc 
heap, and dc-allocaic off or another. Defined as "glo- 
balhcap : boolean". 

ITic following local variables must be dcclaicd first in the 
task : 

1) Local heap pointer. There is normally no need to 
access this variable by the task explicitly, it is used by the 
support routines only. Defined as "hcapptr : longhcx". 

2) Module header pointer. This is the address of the 
local task's module header that is created during task 
staitup. Defined as "modpir : longhcx" 

3) Parent lask ID code. If the child lask needs to send 
a signal to the parent, this is ihc ID value 10 use. Defined 
as"parid : integer". 

4) Child lask ID code. This is ID valucof the new lask. 
Defined as "myid : inicgcr". 

Any other local variables needed will follow those 4 
above. 

How does all Ihis work? First, ihc support routine 
buildsamodulchcadcrfor Ihc new t?sk using thc256 by ic 
buffer provided. This module header also contains a 
small amount of code used lo start executing the actual 
task procedure code. Ihc module header also has values 
such as Ihc siacksizc requested copied from the parame- 
ter list. After it has built the module header, it calls (he 
OS-9 routine lo set in the correct module header check- 
sum and CRC. It then calls a routine called "vcrmod" 
which has been previously loaded into memory. Vcrmod 
runs in system state and is used to enter the newly created 
module header into ihc system module table. Ii then 
terminates. This little bit of trickery is needed since Ihc 
only way to enter a module into the module directory in 
user slate is to load a file from disk. 

Now that we have our new task in Ihc module direc- 
tory, we cxccutca "fork" call to actually start it, using the 
values such as priority from Ihc parameter list. The code 
then sets in the return parameters such as "ncwid" and 
returns to the calling program. Should a task procedure 
end, it simply docs an "exit" call resulting in being 
terminated by ihc operating system andrcmoved from the 
module directory. 

Here is an excerpt from the Pascal shell, showing the 
basic code involved in the background chain : 



procedure background (name : string [32) ; 

stacksize : longhex ; header : longhex 
iopaths, priority : integer ; 
var newid, taskerr : hex ; 
globalheap : boolean) ; task ; 
var 



heapptr, niodptr : longhex ; 
parid/ niyid : integer ; 
inpath, outpath, auxpath : text ; 
back_fnext : "files ; 
back_onext : *optlist ; 
tilt : boolean ; 
lerr : hex ; 
begin 

reset (inpath, '/nil') ; 
rewrite (outpath, backfile) ; {backfile 
set 

by 
cal ler ) 

rewrite (auxpath, '/nil') ; 
back_fnext :- fbase ; 
tilt :- false ; 
while back_fnext <> nil do 
begin 

if (back_f next*. options <> 0) and 
(back_fnext* .class •= pascal) 
then 
begin 

back__onext :« obase ; 
while back_onext*.optnum <> 
back_f next*. options do 

back_onext :<• 
back_onext* .link; 

(use backonext* .optstring for 
conmand line processing 
nodule name will be 'pc' ) 
tilt :- shell (comstr) ; 
(comstr is contiiand line) 
end ; 
back_fnext :■ back_f next* .link 
end ; 
( do same for assembly, 
module name - 'ra' ) 
( get ready to terminate this task, 

close paths first) 
lerr ;» i_close (0) ; 
lerr :<= i_close (1) ; 
lerr :— i_close (2) 
end ; (terminate task) 

When the main program wants to start the 
background, it executes something like : 

err :- f_id (mainid, mainpr, maingrp) ; 
backfile :- concat ( 'back_' , string (mainid) ) 

background 
(concat ( 'psback' , string (mainid) ) , 

1000, addr (backhead) , 0, 100, newid, 
taskerr, true) 

The shell function is a useful general purpose 
routine to call a program with command line 
options, such as : 'pc -os test .' 

function shell (comstr : string) : boolean ; 
var 



27 



January '88 



68 Micro Journal 



type_id, err, cerr, dead id : hex ; 


As an example, the procedure "waitdisp" will wait until 


begin 


the resource controlled by the byte variable "out" is 


type_id :- ; 


available. 


shell :- false ; 




err :- f fork (comatr, 'shell', 0, 3, 






procedure waitdisp ; 


0, type_id) ; 




if err O 


var 


then 


time : longhex ; 


begin 


err : hex register ; 


f_perr (en, 0) ; 


begin 


shell :- true 


while not tas (out) do 


end 


begin 


else 


time :- 1 ,• 


begin 


err :- f_sleep (time) 


repeat 


end 


err :- £_wait (dead id, cerr) 


end ; 


until type id - dead id ; 




if err <> 

then 


Next monih (1 hope!) we will look at generating a 


begin 


program that docs not need an operating sysiem, some- 


f_perr (err, 0) ; 


thing that sets OmcgaSofl Pascal apart from most of the 


shell :- true 


compilers available from operating system vendors. 


end 




else if cerr O 


OmegaSoft is a registered trademark of Certified Soft- 


then 


ware Corporation. OS-9 and OS-9/68000 are trade- 


begin 


marks of Microware Systems Corporation. 


f_perr (cerr, 0) ; 


EOF 


shell :- true 




end 




end 




end ; 




You can sec from this example lhal each task can 




share global mcmoiy, but what if we want to access a 




global variable, but want some control of when lhal can 




be done. One very fast and simple way is to use a 




semaphore. One common need is to control access to a 




device, such as a CRT screen. This resource can be con- 




trolled by using a byte (or shoitintcgcr or shorthcx in 




68020 Pascal) variable. To indicate that the resource is 




available, the byte isscl to zero. To request access, use the 




Pascal boolean function TAS. If (he resource was avail- 




able TAS will set the byte negative indicating in-usc, and 




return true indicating you may now use the icsourcc. If 




the byte was already negative because someone else is 




using the resource, then TAS will return false. Ihc TAS 




function uses the 68000 TAS instruction, which is indi- 




visible, guaiamecing propcrtask synchronization. When 




you arc done with the resource, simply set the flag to zero, 




which will indicate toanothcr task that it is now available. 




FOR THOSE WHO 


Ni:i:n to know 


68 MICRO 
JOURNAL™ 
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DISASSEMBLERS 



SUPER SLEUTH from Computer Systems Consultants Interactive 
Disassembler;, extremely POWERFUL' Disk Hie Binaiy/ASCil 
Exarninc«Changc. Absolute or FULL Disassembly. XREF 
Generator. Ijbcl "Name Changer", and Files of "Standard Isabel 
Karnes" for different Operating Systems. 

Color Computer SS50 Bus (all wl A L. Source) 

CCD (32KRcqd) Obj Only $49.00 

F, S, $99.00 - CCF, Obj. Only $5000 V. $10000 

CCF. wISource 199.00 0. $10100 

CCO. Obj. Only SSOjOO 

0S9 6BK Obj. $100.00 w/Source $200.00 
•YNAMITE* - Excellent standard "Batdi Mode" Disassembler. 

Includes XRF.F Generator and "Standard l-abcl" Files. Special OS-9 
options w/OS-9 Version. 

CCF. Obj. Only $100.00 . CCO. Obj. $ 59.95 

F,S, " " $100.00 -0. object only $150.00 

U. '• " $300.00 

PROGRAMMING LANGUAGES 

PI. 19 from Windmsh Micro Systems -- By Giaham Tretl. A combination 
Editor Compiler Debugger. Direct source -to -objact compilation 
delivering fast, compact, icciittanl, ROM able. PIC. 8& 16 bit 
Integers & 6digit Real numbers for all real-world problems. Direct 
control over A IX System resources, including interrupts. 
Comprehensive library support: simple Machine Cade interface; 
stcp-by-slep tracer for instant debugging. 500+ page Manual with 
tutorial guide. 

F.S, CCF . $19800 

PASC from S.R. Media - A FLF.X9. SK'OOS Compiler with a definite 
Pascal "flavor". Anyone with a bit of Pascal experience should he 
able to begin using PASC to good effect in short order. The PASC 
package comes complete with three sample programs: ED (a syntax 
or structure editor), EDITOR (a simple, public domain, screen 
editor) and CHESS (a simple chess program). The PASC package 
come complete with source (written in PASC) and documentation. 
FLFX.SK'DOS $95.00 

WHIMSICAL from S.E. MEDIA Now supports Real Numbers. 
"Structured Programming' WITHOUT losing the Speed and 
Control of Assembly [jtnguagcl Single-pass Compiler features 
unified, uscrdclincd I/O*, produces ROMablc Cuilc; Procedures and 
Modules (including prc-aompilcd Modules); many "Types" up to 32 
bit Integers. 6 digit Real Numbers, unlimited sized Arrays (vectors 
only): Interrupt handling; long Variable Names; Variable 
Initialization; Include diicctivc; Condilitrnal compiling; direct Code 
insertion: control of the Stack Pointer; etc. RunTime subroutines 
inserted as called during compilation. Normally produces 10% less 
code than PU9. 

F.S and CCF .$195.00 



KANSAS CITY BASIC from S.E. Media - Basic for Color Computer 
OS-9 with many new commands and sub functions added. A full 
implementation of the IFTHKNEI.SE logic is included, allowing 
nesting to 255 levels. Strings arc supported and • subset of the 
usual siring functions such as LEFTS. RIGHTS, MID$, STRINGS. 
etc. are included. Variables are dynamically allocated, Also 
included are additional features such as Peck and Poke. A must for 
any Color Computer user running OS-9. 
CoCoOS9 $39.95 
C Compiler from Windmsh Micro Systems by James McCosh. I'ullC 
for FU'X. SK*DOS except bit-fields, including an Assembler. 
Requires the ISC Relocating Assembler if user desires to implement 
his own Libraries. 

F.S and CCF $295.00 
C Compiler from Intrul •• Full C except Doubles and Bit Fields, 

streamlined for the 6809. Reliable Compiler FAST, efficient Code. 
Mote UNIX Compatible than most. 
FLEX.SK'DOS. CCF. OS-9 (Uvel It ONLY). U - $575.00 
PASCAL Compiler from LucidaU - ISO Based P -Code Compiler. 

Designed especially for Microcomputer Systems. Allows linkage to 
Assembler Code for maximum flexibility. 

F. S and CCF 5" - $190J00 F.S «"- $205 00 
PASCAL Compiler frum OmcgaSuft (now Certified Software) -- For 
the PROFESSIONAL. ISO Based, Native Code Compiler. Primarily 
for Real-Time and Process Control applications. Powerful; 
Flexible. 

OS-9. F. S and CCF - $550.00 
OS 9 68000 Version - $900 00 
K11ASIC - from S.E. MEDIA -- A "Native Code" BASIC Compiler 
which is now Fully TSC X BASIC compatible. The compiler 
compiles to Assembly Language Source Code. A NEW, 
streamlined, Assembler is now included allowing the assembly of 
1.ARGE Compiled K.-BASIC Programs. Conditional assembly 
reduces Run time package. 

FLfX. SK'DOS. CCF. OS-9 Compiler I Assembler $99.00 
CRUNCH COllOL from S.E. MEDIA - Supports large subset of ANSI! 
Level 1 COllOL with many of the useful Ixvcl 2 fcaluics. Full 
Fi.EX, SK'DOS File Structures, including Random Files and the 
ability to process Keyed Files. Segment and link large programs at 
lunlimc, or implemented as a set of overlays. The System requires 
S6K and CAN he run with a single Disk System. A very popular 
product. 

FLFX, SK'DOS, CCF 599 95 
FORTH frum Stearns Electronics - A CoCo FORTH Programming 
Language. Tailored to the CoCo I Supplied on Tape, tiansfciablc to 
disk. Written in FAST ML. Many CuCo functions (Graphics. 
Sound, etc.). Includes an liditor. Trace, etc. Provides CPU Carry 
Mag accessibility. Fast Task Multiplexing, Clean Interrupt 
Handling, etc. for the "Pro". Excellent "learning" taoll 
Color Computer ONLY - 158 95 
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r • run*, it • t.nin.KX 
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FORTHBU1LDER is i stand-alone taiget compiler (crosscompiler) for 
producing custom Forth tysians and application programs. 
All of ihe in-standard defining words and control structures are 
reeogrozai by FORTHBUILDLR. 

FORTHBUrLDER is designed to behave as much as possible like 
a resident Forth interpreter/compiler, so that most of the 
established techniques for writing Forth code can be usad without 
change. 

Like compilers for other languages. F0RT1 [RUILDF.R can operate 
in "batch mode". 

Ihe compiler recognizes and emulates urge! names defined by 
CONSTANT or VARIABLE and is readily extended with 
"compile-time" definitions to emulate specific target words. 
FORTHBUILDF.R is supplied as an executable command file 
configured for a specific host system and target processor. Object 
code produced from (he accompanying model source code is 
royalty free lo licensed users. 
F.CCF.S - J99.95 

DATABASE ACCOUNTING 

XDMS from Westchester Applied Business -Systems 

KOR 6809 Kl>KXrSK«l)OS(S/8") 

Up to 32 groups/fields per record I Up to 12 character filed name! Up to 
1024 byte records! User defined screen and print control! Process 
files! Form files! Conditional execution! Process chaining! Upward/ 
Downward file linking! File joining] Random file virtual paging! 
Built in utilities! Built in leal line editor] Fully session oriented! 
Enhanced forms! Boldface, Double width. Italics and Underline 
supported! Written in compact structured assembler! Integrated for 
FAST execution! 
XDMS-IV Data Management System 

XDMS IV is a brand new approach lo data management. It not only 

permits users lo describe, enter and retneve data, but also lu process 
enure files producing customized reports, screen displays and lilc 
outpuL Processing can consist of any of a set of standard high level 
functions including record and field selection, sorting and 
aggregation, luukups in other files, special processing of record 
subsets, custom report fonnalling, lolalmg and subtotaling. and 
presentation of up to three related files as a "database" on user 
defined output report*. 
POWERFUL COMMANDS! 

XDMS-IV combines the functiunalily of many popular DBMS software 
systems with a new easy lo use command set into a single integrated 
package. We've included many new features and commands 
mcluduig a set of general file utilities. The processing commands 
are Inpm-Proccss-Outpul (11*0) orienle which allows almost instant 



implementation of a process design. 

SESSION ORIENTED! 

XDMS-IV is session oncnied. Enter "XDMS" and you arc in instant 
command of all the features. No more waiting for a command lo 
load in from disk! Many commands are immediate, such as 
CREATE (file definition), UPDATE (file editor). PURGE and 
DELETE (utilities^ Others are process commands which are used lo 
create a user process which is executed with a RUN command. 
Either may be entered into a "process" file which is executed by an 
EXECUTE statement. Processes may execute other processes, or 
themselves, eiiher conditionally or unconditionally. Menus and 
screen prompts are easily coded, and entire user applicauons can be 
run without ever leaving XDMS-IV 

1TSEASYTOUSEI 

XDMS-IV keeps data management simple! Rather than design a complex 
DBMS which hides the true nature of the data, we kept XDMS-IV 
tile oriented The user view of data relationships is presented in 
reports and screen output, while the actual data resides in easy lo 
maintain files. This aspect petmiu customiaed presentation and 
reports without complex redefinition of tile database files and 
Sliucture. XDMS-IV may be used for a wide range of applications 
from simple record management systems (addresses, invcnloiy ...) 
lo integrated database systems (order cntiy, accounting.. ) 

The possibilities are unlimited... 
FOR 6809 r1>:X-SK»DOS(S/8"> J249.95 



ASSEMBLERS 

ASTRLK09 from SB. Media - A "Structured Assembler for the 6809' 
whidh requires the TSC Macro Assembler. 
F.S.CCF . $99 95 
Macro Assembler for TSC -The FLEX, SK-DOS STANDARD 
Assembler. 

Special ■■ CCF $25DO; F. S 150 00 
OSM Extended 6809 Macro Assembler from Uoyd I/O. ■■ Provides local 
labels, Motuiola S-recoids. and Intel Ilex records; XREF. 
GeneOretc OS 9 Memoiy modules under FI.EX, SK'DOS 
FLEX. SK'DOS. CCF. OS 9 $99.00 
Relocating Assembler/Linking Loader from TSC. -- Use with many of 
ihe C and Pascal Compilers. 
F . S. CCF $150.00 
MACE, by Giaham Troll from Windrush Micro Systems -Co Reiidcnl 
Editor and Assembler fast interactive A.l. Programming for small 
to medium-sized Programs. 
F.S.CCF . S7Sj00 
XMACE - MACE wACross Assembler for 680CV1/2/3/8 
F . S. CCF $98 00 
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UTILITIES 

Bas(c09 XRef from S.E. Media -- This Buic09 Crass Reference Utility 
is • Basic09 Program which will produce a "pretty printed" listing 
with each line numbered, followed by a complete cross referenced 
listing of all variables, external procedures, and line numbers called. 
Also includes a Program List Utility which outputs i fast "pretty 
printed" listing with line numbers. Requires Basic09 or RunB. 
O & CCO obj. only » $39.95; wl Source - $79.95 

DTrce Routines - Complete set of routines to allow simple 

implementation of keyed files -for your programs - running under 
BasicO"). A real time saver and should be 1 pan of eveiy seiious 
programmers tool-box. 

O & CCO obj. only - 189.95 

Lucliiala PASCAL UTILITIES (Requires Pascal ver 3) 

XREF - produce a Cioss Refeience Listing of any text; or.cnled to 
Pascal Source, 

INCLUDE - Include other Files in ■ Source Text, including Binaiy • 
unlimited nesting. 

PROFILER - provides an Indented, Numbered, "Slructogram" of a 
Pascal Source Text File; view the overall structure of large 
programs, program integrity, etc. Supplied in Pascal Source Code; 
requires compilation. 

F. S, CCF ... EACH 5" - 140 SO. 8" - $50X10 

DUB from S E. Media -- A UnlFLEX BASIC decompiler Re Create a 
Source Listing from UniFI.F.X Compiled basic Programs. Works 
w/ ALL Versions of 6809 UniFlXX basic. 
U -$219.95 

LOW COST PROGRAM KITS from Southeast Media The following 
kits are available for FLEX, SK'DOS on either 5" or 8" Disk. 

1. BASIC TOOL-CHEST $29.95 
BUSTER.CMD: prasty primer 
LJNEXREF.BAS: line cross-referenccr 
REMPAC.BAS, SPCPAC.BAS, COMPAC.BAS: 
remove supeii'luous code 

STRIP. BAS: supeii'luous line-numbers stripper 

2. FLEX. SK'DOS UTILITIES KIT $39.99 
CATS. CMO: alphabetically. sorted directoty listing 
CATD.CMO: dalc-soitcd diiecioiy listing 
COPYSORT.CMD: file copy, alphabetically 
COPYDATE.CMD: file copy, by dale-order 
F1LEDATE.CMD: change Tile creation date 

DSTO.CMD (A BVFOGMX.CMD): tells disk attributes ^contents 

RELLNK.CMD (& RELINK82): re -orders fragmented free 

chain 

RESQ.CMO: undeletes (recovers) a deleted file 



SECTORS.CMD: show sector order in flee chain 
XI.CMD: super text lister 

3. ASSEMBLERS/DISASSEMBLERS UTILITIES 

$39.95 
IJNHFEED.CMD: modularise* disassembler output 
MA Til. CMO: decimal, hex. binaiy, octal conversions 
A tables 
SKIP.CMO; column snipper 

4. WORD • PROCESSOR SUPPORT UTILITIES 

$4995 
FULLSTOP.CMD: checks for capitalization 
BSTYCIT.B AS (.B AC): Stylo to dot-matrix printer! 
NECPRINT.CMD: Stylo to dot-matrix printer filler code 

5. UTILITIES FOR INDEXING $49.95 

MENU. BAS: selects required program from list below 

INDEX. BAC: word index 

PIIRASES.BAC: phrase index 

CONTENT.BAC: table of contenu 

CMDXSORT.BAC: fast alphabetic son routine 

FORM ATER.BAC: produces a 2-Column fonnattcd index 

APPEND BAC: append any number of files 

CHAR. BIN: line leader 

BASIC09TOOLS consist of 21 subroutines for BasicQ9. 
6 were written in C Language and the remainder in assembly. 
All the routines are compiled down to native machine code which 
makes them fast and compact. 

1 . CFII.L - Tills a string with characters 

2. DPEEK •• Double peek 

3. DPOKE - Double poke 

4. FPOS -Cuirent file position 

5. FS1ZE- File size 

6. FTRIM •- removes leading spaces from a siring 

7. GETPR — returns the current process ID 

8. GETOPT -- gels 32 byte option section 

9. GETL'SR - gets the user ID 

10. GTIME - gets the time 

1 1. INSERT - insert a string into another 

12- LOWER — converts a string into lowercase 

13. READY •• Checks for available input 

14. SETPRIOR — changes a process priority 

15. SETUSR - changes the user ID 

16. SETOPT •- set 32 byte option packet 

17. STIM E - sets the time 

1 8. SPACE - adds spaces to a sir ng 

19. SWAP •- swaps any two variables 

20. SYSCAI.L - system call 

21. UPPER --converts a suing to uppercase 
For OS9 - S44.95 - Includes Source Code 
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See Review in January 1987 issue of 68 Micro Journal 

SOFTOOLS 

Ttic following programs are included in object form for immediate 
application. PL/9 source code available for customimion. 

README Complete insliuctiofts for initial setup and operation. Can 

even be printed out with the included text processor. 
CONFIG one time system configuration. 

CHANGE changes wotds, characters, etc. globally to any leu type file. 
CLEANTXT converts lext files to standard FLEX. SK'DOS files. 
COMMON compile two text files and reports differences. 
COMPARE another check fiilc that reports mis matched lines. 
CONCAT similar to FLEX. SK'DOS append but can also list files to 

screen. 
DOCUMENT for PL/9 source files. Vcty useful in examining parameter 

pissing aspects of procedures. 
ECHO echo* to either screen or file. 
FIND an improve fund command with "partem" matching and wildcards. 

Vcty useful. 
HEX dumps files in both hex and ASCII, 
INCLUDE a file copy piogram lhat will accept "includes" of other disk 

files. 
KWIC allows rotating each word, on each line to the beginning. Veiy 

useful in a son program, etc. 
LISTDIR a dirccloiy listing program. Not super, but better than CAT. 
MEMSORT a high-s(ieed text file sorter. Up to 10 fields may he sorted. 

Very fast. Veiy useful. 
MULTICOL width of page, number of columns may be specified. A 

MUSTI 
PACE similar to LIST but allows for a page header, page width and 

depth. Adjust for CRT screen or p: inter as set up by CONFIG. A 

veiy smart ptint driver. Allows primer control commands. 
REMOVE a fast file deleter. Careful, no prompts issued. Zap, and its 

gone! 
SCREEN a screen listing utility. Word wraps text to fit screen. Screen 

depth may be altered at run time. 
SORT a super version of MEMSORT. Ascending/descending order, up 

to 10 keys, case over-ride, son on nth word and son on characters if 

file is small enough, sorts in RAM. If large file, son is con! mined 

to size of your largest disk capacity. 
TPROC a small but nice text formatter. This is a complete formatter and 

has functions not found in other formatters. 
TRANSLfr sons a file by x keyficlds. Checks for duplications. Up to 

10 key (lies may be used. 
UN ROTATE used with KWIC this program reads an input file and 

unfolds it a tine a! a lime. If the file has been sorted each word will 

be presented in sequence. 
WC a word count utility. Can count words, characters or tines. 

NOTE: this set of utilities consists of 6 Si/4" disks or 2 8" dWos, w/ 
source (PL9). 3 S- 1/4" disks or I 8" disk w/o source. 
Complete set SPECIAL INTRO PRICE: 
5-1/4" w/souice FLEX - SK'DOS - S129.95 



w/o source • $79.95 
8" w/source - $79.95 



w/o source S49.95 



FULL SCREEN FORMS DISPLAY from Computer Systems 

Consultants - TSC Extended BASIC program suppons any Serial 
Terminal with Cursor Control or Memory-Mapped Video Displays: 
substantially extends the capabilities of the Program Designer by 
providing a table-driven method of describing and using Full Screen 
Displays. 

F, S and CCF. U ■ S25JOO, wt Source . S50.00 

SOLVE from S.E. Media - OS-9 levels I and [I only. A Symbolic 
Object/Logic Verification & Examine debugger. Including inline 
debugging, disassemble and assemble. SOLVE IS THE MOST 
COMPLETE DEBUGGER we have seen for the 6809 OS-9 scries! 
SOLVE does it all I With a rich selection of monitor, assembler, 
disassembler, environmental, execution and other miscellaneous 
commands, SOLVE is the MOST POWERFUL tool-kit item you 
can ownt Yet, SOLVE is simple to usel With complete 
documentation, a snapl Everyone who has ordered this package has 
raved! See levicw - 68 Micro Journal - December 1985. No "blind' 
debugging here, full screen displays, rich and complete in 
information presented. Since review in 68 Micro Journal, this is our 
fastest mover! 

UvcU I & II only - OS-9 S69.9S 



DISK UTILITIES 

OS-9 VDisk Tram S.E. Media -■ For Level I only. Use the Extended 
Memory capability of your SWTPC or Gimix CPU card {or similar 
formal DAT) for FAST Program Compiles. CMD execution, high 
speed inier-process communications (without pipe buffers), etc. - 
SAVE lhat System Memory. Vinual Disk size is variable in 4K 
incrcOmcnls up to 960K. Some Assembly Required. 
Uvtlt OS-9 obj.%79.9i; w) Source S149.95 

O.F from S.E. Media - Written in BASIC09 (with Source), includes: 
REFORMAT, a BASIC09 Program thai reformats a chosen amount 
of an OS-9 disk to FLEX, SK'DOS Formal soil can be used 
normally by FLEX. SK'DOS; and FLUX, a BASIC09 Piogram that 
does the actual read or write function to the special O-F Transfer 
Disk; user-friendly menu driven. Read the FLUX. SK'DOS 
Directory. Delete FLEX, SK'DOS Files, Copy both directions, etc. 
FLUX. SK'DOS users use the special disk just like any other Fl.KX, 
SK'DOS disk 

■ 6809/69000 S79.95 

LSORT from S.E. Media - A SORT/MERGE package for OS 9 (Level I 
& II only). Sorts records with fixed lengths or variable lengths. 
Allows for either ascending or descending sort. Soiling can be done 
in cither ASCII sequence or alternate collating sequence. Right, left 
or no justification of data fields available. LSORT includes a full 
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set of comments and errors messages. 
OS-9 $85.00 

II [ ER from S.I:. Media ItlEH is a modern hierarchol storage system for 
users under FLEX. SK'DOS. tt answers the needs of those who 
have hard disk capabilities on their systems, or many files on one 
disk - any si«. Using HI KR a regular (any) Fl.EX, SK'DOS 
disk (8 • S • hard disk) can have sub directories. By this method 
the problems of assigning unique names to files U less burdensome. 
Different liles with the exact same name may be on the same disk, 
as long as they are in different directories. Jw the Winchester user 
this becomes a must. Subdirectories arc the modem day solution 
thai all current large systems use. Each directory looks to FLEX, 
SK'DOS Ilk* a regular file, except they have the extension 
'.DIR' A full set of directory handling programs are included, 
making the operation of IIIER simple and straightforward. A 
special install package is included to install Illl-Jt to your particular 
version of HI. EX, SK'DOS. Sane assembly required. Install 
indicates each byte or reference change needed. Typically - 6 byte 
changes in source (furnished) and one assembly of IIIER is all that 
is required. No progtamming required) 
FU-JC ■ SK'DOS $79.95 

COPY Ml' LT from S.R. Media Copy URGK Disks to several 

smaller disks. FLEX. SK'DOS utilities allow the backup of ANY 
size disk to any SMALLER size diskettes (Hard Disk to fiojipies. 8" 
to S", etc.) by simply insciting diskettes as requested by 
COPYML'LT. No fooling with directory deletion s. etc. 
COPYMULT.CMD understands normal "copy" syntax and keeps up 
with files copied by maintaining directories for both host and 
receiving disk system. Also includes BACKUP.CMD to download 
any sue "random" type file: RESTORE.CMD to restructure copied 
"random" files for copying, or recopy ing back to the host system; 
and FREEl.INK CMD as a "bonus" utility that "relinks" the free 
chain of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly Language Source pies included 
ALL4 Programs (FLEX, SK'DOS, » m or 5 m ) S99 SO 

COPYCAT from LuiadaU - Postal NOT required Allows reading 

TSC Mim-HUiX. SK'DOS, SSB DOS68. and Digital Research CP/ 
M Disks while operating under SK'DOS . FI-RXl O. FUIX 2.0. or 
FLEX 9.0 wiih 6800 or 6809 Systems. COPYCAT will nut 
perform miracles, but, between the program and the manual, you 
stand a good chance of accomplishing a transfer. Also includes 
some Utilities to help out. Programs supplied m Modular Source 
Code (Assembly Language) to help solve unusual problems. 
F.SamlCCFS-SiOM F.S$ m -X6SM 

VIRTUAL TERMINAL from S.E. Malta . Allows one terminal to do 
the work of several. The user may start as many as eight task on one 
terminal, under VIRTUAL TERMINAL and switch hack and forth 
between task at will. No need to exit each one: Jusljumpback and 
forth. Complete wiih configuration program. 1 he best way to keep 



up with those background programs. 
A CCO - obj. only . S49.95 

FLEX, SK'DOS DISK UTILITIES from Computer Systems 

Consultants -- Eight (8) different Assembly language (w/ Source 
Code) FLEX. SK'DOS Utilities for every FLEX. SK'DOS Users 
Toolbox: Copy a File with CRC Errors; Test Disk for errors; 
Compare two Disks: a fast Disk Backup Program: Edit Disk 
Sedan; I incaritt Free-Chain on the Disk; print Disk Identification: 
and Son and Replace the Disk Direcioiy (in sorted order) — PLUS 
-- Ten XRAS1C Programs including: A BASIC Rescquenccr with 
EXTKAs over "RENUM" like deck for missing label definitions, 
processes Disk to Disk instead of in Memoty, etc. Other programs 
Compare, Merge, or Generate Updates between two BASIC 
Programs, check BASIC Sequence Numbers, compare two 
unsequenced files, and 5 Programs for establishing a Master 
Direcioiy of several Disks, and sorting, selecting, updating, and 
printing paginated listings of these files. A BASIC Croat-Reference 
Program, written in Assembly language, which provides an X-Ref 
Listing of the Variables and Reserved Words in TSC BASIC, 
XII ASIC, and PRECOMPILER I! ASIC Programs. 

ALL Utilities include Sourcei (either BASIC or AL, Source Code/. 
F.SandCCF $5000 
BASIC Utilities ONLY for UniFLEX - S30M 

COMMUNICATIONS 

CMOI1EM Telecommunications Program from Computer Systems 

Consul anil. Inc. — Menu-Driven; supports Dumb- Terminal Mode, 
Upload and Download in non-protocol mode, and the CP/M 
"Modem?" Qirislensen protocol mode to enable communication 
capabilities for almost any requirement. Written in "C". 

FLEX. SK'DOS, CCF. OS-9, UniFLEX. 68000 A 68Mh 
Source $100 00 - without Source $50 00 

X-TAI.Kfrom S.E. Media- X-TA1.K consists of two disks and a special 
cable, (lie hookup enables a 6809 SWTPC computer to dump 
UrulLEX files directly to the UniFLEX MUSTANG-020. Tins is 
the ONLY currently available methoil to transfer SWTPC 6S09 
UruFLEX files to a 68000 UniFLEX system. Gimix 6809 users 
may dump a 6809 UniFLEX fie to a 6809 UniFLEX five inch disk 
and II II readable by the MUSTANG-020. live cable is socially 
jircparcd with mlemal connections to match the non-standard 
SW'ITC SO/9 I/O Db25 con neciors. A social SW1 PC S« cable set 
is also available. Users should specify uhich SWTPC system he/ 
she wtsliei to communicate with ilie MUSTANG-020 The X- 
TAl X software is furnished on two disks. One eight inch disk 
con wins S.E. Media modem program C-MODEM (6809) and Ihe 
other disk is a MUSTANG-020 five inch disk with C MODEM 
(68020), Text and hinaiy files may be directly transferred between 
Ihe two systems. Ihe C-MODEM programs are unaltered and 
perform as excellent modem programs also. X-TALK can be 
purchased wuh or without the special cables, hut litis special pnee is 
available to registered MUSTANG. 020 users only. 
X-TALK Complete (noble, 2 dish) $99.95 



Mdlsbllli) lijrr,,:, 

O.O.S».$. iKMKU 
F.FLEX.IJ. UatVLEX 
CCa . <M» QtBtftttsf OS.* 
CTT • CMo> Canaan* M IV 



■ 



South Tost Media 

5900 Cassandra Smilk "U- ■ iMivon, Tn. J 734} 




" Shipping " 

AM 2% USA. nolo. SIM) 
Kercta* Sorran AM J* 
Fortttn A Irani A«tt 10% 
Or C0.D. SblpfUa Oali; 



•QUA li ttrrndtrnMih of Mhr.^irt irwi M..l.f..la 'H IA and t filH |:X lit TudftnThi ,4 Jr, linhat *.yium* I i.nmll»wn ".K'lwis l» a I ririinwrl, „f \m K v.nmri \<,«tr; L <* P 



34 



January '68 



66 Micro Journal 



'Telephone: (6 1$) 842-4600 SoUtft *Ea$t fytzlHd 



Tefag 5106006630 



OS-9, llni'/VLX, 'J'L'EX, S'K'-DOS 



X-TALK Softwart (2 disks only) $69.95 

X-TALK with CMODEM Source $149.95 
XDATA from S.E. Media - A COMMUNICATION P«ck»ge for the 
UniFLEX Operating System. Use with CP/M, Main Frames, other 
UniFLEX Syr ems, etc. Verifies Transmission using checksum or 
CRC: Rc-Transmiis bad blocks, etc. 

U • 1299.00 

EDITORS & WORD PROCESSING 



JUST from S.E. Media -- Text Formatter developed by Ron Anderson; 
for Dot Matiix Printers, provides many unique features. Output 
"Foimatted" Text 10 ihc Display. Use the FPRDNT.CMD supplied 
for producing multiple copies of the "Formatted" Text on the Printer 
INCLUDING IMBEDDED PRINTER COMMANDS (very useful 
at other times also, and wonh the price of Ihc program by itsell). 
"User Configurable" for adapting to other Prinlere (comes sel up for 
Epson MX-80 wjih Graftr&x): up to ten (10) imbedded "Printer 
Control Commands". Compensates for a "Double Width" piinted 
line. Includes the normal line width, margin, indent, paragraph. 
space, veitical skip lines, page length, page numbering, centering, 
fill, juslilicat an. etc. Use wiih PAT or any other editor. 

■ Now supplied as a two disk set: 

Dirt HI: JUST2.CMD object fill, 

JUST2 TXT PL9 sourceFLEX. SK'DOS ■ CC 

Disk #2. JUSl^C object and source <j\ C: 

FLEX. SK'DOS - OS9 - CC 

The JTSC and regular JUST C source arc two separate programs. JTSC 
compiles to a version that expects TSC Wend Processor type 
commands, (.pp .sp .cc etc.) Great for your older text Hies. The C 
soiree compiles to a standard syntax JUST.CMD object file. Using 
JUST syntax (,p ,u ,y etc) With all JUST functions plus several 
additional piimcr formatting functions. Reference the JUSTSC C 
source- For those wanting an excellent BUDGET PRICED word 
processor, with features none of the others have. This is ill 

Ditk (I) ■ PL9 FLEX only- F.SA CCF - $49.95 
DitkSei (2) F.SA CCF A 0S9 (C version) . $69.95 
OS-9 6SK0OO complete with Source . 179.95 

I'AT from S.E. Media - A full feature screen oriented TEXT EDITOR 
with all the Ixst of "PJB"*". l^r those who swore by and loved only 
PIE. this is for you! All PIE features and much more! Too many 
features to list. And if you don't like these, change or add your own. 
PL- source furnished. "C" source available soon, liasily 
configured to your CRT, with special oonfig section. 
Regular FLEX. SK'DOS 1129 50 
• SPECIAL INTRODUCTION OFFER • J79.95 
SPECIAL PAT/JUST COMBO (wlsource) 

FLEX, SK'DOS $99.95 
OS-9 68K Version $229.00 



SPECIAL PAT/JUST COMBO 68K $249.00 
Note: JUST in "C" source available for 0S.9 

CEDR1C from S.E. Media - A semen oriented TEXT EDITOR with 
availability of 'MENU' aid. Macro definitions, configurable 
permanent definable MACROS' - all standard features and the 
fastest 'global* functions in the west- A simple, automatic terminal 
config program makes this a real 'no hassel' product. Only 6K in 
sine, leaving the average system over 165 secton for text buffer - 
appx. 14,000 plus of free memory I Extra fine for programming as 
well as texL 

FLEX, SK'DOS $69.95 

BAS. EDIT from S.E. Media- A TSC BASIC or XBASIC screen editor. 
Appended to BASIC or XBASIC, BAS-EDIT is transparent to 
normal BASIC/XBAS1C operation. Allows editing while in 
BASIC/XBASIC. Supports the following functions: OVERLAY, 
INSERT and DUP LINE. Make editing BASIC/XBASIC programs 
SLMI'LEI A GREAT lime and effort saver. Programmers love it! 
NO more retyping entires lines, etc. Complete with over 25 
different CRT terminal configuration overlays, 
FLEX. CCF. SIC DOS $39.95 

SCR EDITOR III from Windrush Micro Systems - Powerful Screen- 
Oriented Editor/Word Processor. Almost 50 different commands; 
over 300 pages of Documentation with Tutorial. Features Multi- 
Column display and editing, "decimal align" columns (AND add 
Ihem up automatically), multiple keystroke macros, even/odd page 
headers and footers, imbedded piinter control aodes. all 
justifications, "help" support, store common command sales on 
disk, etc. Use supplied "set-ups", or remap the keyboard to your 
needs. Except for propoitional printing, this package will DO IT 
ALL) 

6800 or 6809 FLEX, SK'DOS or SSB DOS. OS-9 . $175 DO 

SPELLB "Computer Diclionaiy" from S.E. Media -- OVER 150,000 
words! Laok up a word from within your Editor or Word Processor 
<with the SPH.CMD Utility which operates in the FLEX, SK'DOS 
UCS). Or chack and update the Text after any; ADD WORDS to 
the Diclionaiy, "Flag" questionable words in Ihc Text, "View a word 
in context" before dunging or ignoring, etc. SPELLB first checks a 
"Common Word Diclionaiy", then the normal Diclionaiy, then a 
"Personal Word List", and finally, any "Special Word List" you may 
have specified. SPELLB also allows the use of Small Disk Storage 
systems. 

F. S and CCF - J/29.95 

STYLO.ORAI'H from Great Plains CompiiierCo. -- A full-screen 

oriented WORD PROCESSOR - (uses the 51 x 24 Display Screens 
on CoCo FLEX/SK'DOS.or PBJ Wordpak). Full screen display 
and editing; supports Ihc Daisy Wheel proportional printers. 
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m&sm 



South 'East Media 

S900 CassandraSmitk %£. - Hfvycm, Tn. 3734 3 




•• Shipping •• 
A44 2* VSJk. Mil. 12.3*) 
Kiirftan Surface Add }» 
ftxrta* Aim* It Addta* 
Or COO. SMoplnaOnly 



«OS.T in Trademark tirMkTftwamnd Vloinrnla ■ *H. E X and tlniKl.KX af a Tra dgmartM of TackBatal Sjrll*»OniultapS»-»VK«IH)'s tiaTfdemira lif Siir-K Sonware Sylrirn t'.M-a, 
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'Telephone: (615) 842-4600 SOUtft TrOSt ^Media 



'Tefe\-: 5 106006630 



OS-9, Vni'JLEX, •JL'LX, SlCDQS 



NEW PRICES 6809 CCF and CCO - $99 95. 

F.Sor -$179 95, U. $299.95 
STYLO-SPELL from Great Plain* Computer Co. -- Fill Computer 
Dictionary. Complements Stylograph. 

NEW PRICES 6809 CCF and CCO - $69.95, 

F.Sor . $99.95, U- $149 95 
S'lTLO-MERCE from Great Plauii Computer Co. - Merge Mailing 
List to "Form" Letters. Piinl multiple Fifes, etc., through Slylo. 

NEW PRICES 6809 CCF and CCO 159 95, 

F.Sor 0. S79.95. U- $129 95 
STYLO-PA K — Graph * Spell ♦ Merge Package Deal I II 

F. Sor . JJ29 95, U - J549 95 

0.68000 $695.00 



MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Systems 

Consultants - TABULA K ASA is similar to DESKTOP/PLAN; 
provides use of tabular compulation schemes used for analysis of 
business, sales, and economic •ondiuons. Mcnu-dnvcn; extensive 
report-generation capabilities. Requires TSC's Extended BASIC. 
F. S and CCF. U SS0O0. w) Sourct $10000 

DY S ACA LC - Electron ic Spread Sheet for the 6809 and 6S000. 
F. S. 0S.9 and SPECIAL CCF - $200 00. U - 1195 00 
OS-9 68K . $595 00 

FULL SCREEN INVENTORY/MRP from Computer Systems 
Consultants — Use Ihc Ful Screen Inventoiy System/Materials 
Requiiemcnl Planning for maintaining inventories. Keeps item field 
file in alphabetical order for easier inquiry. Locale and/or print 
records matching partial or complete item, description, vendor, or 
attributes; find backordcr or below stock levels. Print-outs in item 
or vendor order. MRP capability for the maintenance and analysis 
of Hierarchical assemblies of items in the inventoiy file. Requires 
TSCs Extended BASIC. 

F. S and CCF. U ■ $5000. wl Source . $100 M 

FILL SCREEN MAILING LIST from Computer Systems Consultants 
- Ihc Full Screen Mailing list System provides a means of 
maintaining simple mailing lists. 1-OCJ ic all records matching on 
partial or complete name, city, stale, /jp, or attributes for Listings or 
Labels, elc. Requires TSCs Ki tended BASIC. 

F. S and CCF. U ■ $5000. wl Source . $100 00 

DIET-TRAC Forecaster from S F. Media -- An XII ASIC program lhai 
plans a diet in terms of cither calories and percentage of 
carbohydrates, proteins and fats (C P G%) or grams of 
Carbohydrate. Protein and Fat food exchange* of each of the six 
bask food groups (vegetable, t*r*4. meat, skim milk, fruit and fal) 
for a specific individual. Sex, Age, Height, Present Weight, Frame 
Sim, Activity Level and Basal Metabolic Kate for normal individual 
are taken into account. Ideal weight and sustaining calories foi any 
weight of the above individual arc calculated. Provides number of 
days and daily calendar after weight goal and calone plan is 



determined. 

F. S . $59.95. U ■ $89.95 

CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Computer Systems Consultants - 

Supports \WXJ5. Z-80. 6800/1/2/3/8/1 l/HCtl. 6804, 68Q5/1IC05/ 
146805. 6809/00/01. 6502 family. 8080/5, 8020/1/2/3 5/C35/39/ 40/ 
48/C48/49/C49/50/8748/49. 8031/51/8751. and 68000 Systems. 
Assembler and Listing formats same as target CPU's format. 
Produces machine independent Motorola S-TcxL 
68000 or 6809. FLEX, SK'DOS. CCF. OS-9. UmfLEX 
any object or sourct each - $50 M 
any 3 object or sourct each - $10000 
Set of ALL object $200 DO - w) source $500.00 

XASM Cross Assemblers for FLEX, SK'DOS from S.E. MEDIA - 
This set of 6800/ 1/2/3/5/8. 6301 . 6502. 8080/5. and Z80 Cross 
Assemblers uses the familiar TSC Micro Assembler Command Line 
and Source Code formal, Assembler options, etc., in providing code 
for the target CPU's. 

Complete let. FLEX. SK'DOS only ■ $150 00 
CRASMB from LLOYD I/O - Supports Motorola's, Inters. Zilogs.and 
otlicr'sCPU syntax for these 8-Bit microprocessors: 6800.6801, 
6303,6804. 6805.6809, 6811 (all varieties): 6302. 1802/5, 8048 
family. 8051 family, 8080/85, Z8.Z80. and TMS-7000 family. 
1 las MACROS, [.oca] I Jtbels, Label X-RF.F. Label length to 30 
Chars. Object code formats: Motorola S Records (text), Intel HEX- 
Records (text). OS9 (binaiy). and FLEX. SK'DOS (binary) 
Wrillen in Assembler ... e.g. Vrry FasL 
CPU TYPE - Price each: 

For. MOTOROLA INTEL OTHER COMPLETE SET 
FLF.X9 $150 $150 $150 $399 

SK'DOS $150 $150 $150 $399 

OS9/68B9 $150 $150 $150 $399 

OS9/68K S«2 

CRASMB 16 32 from U.OYD I/O .. Supports Motorola's 68000, and 
has same features as the 8 bit version. OS9/68K Object code 
Foimal allows this cross assembler to be used in developing your 
programs for OS9/68K on yourOS9*5809 computer. 
FLEX. SK'DOS. CCF. OS-916809 $24900 

(JAMES 

RAPIER -6809 Chess Program from S.E. Media - Requires FU3C, 
SK'DOS and Displays on Any Type Terminal. Features: Four 
levels of play. Swap side. Point scoring system. Two display 
boards. Change skill level Solve Checkmate problems in 1-2-3-4 
moves. Make move and swap sides. Play white or black. This It 
one of Hie strangest CHESS programs running on any 
microcomputer, estimated USCF Rating 1600* (belter than mast 
'club' players at higher levels) 
F. S and CCF $79 95 



Anlltatlll; Ut«* 
O.OSS, S.SK'OOS 
F.SXEX,U.trtin.KX 
CCt • Ml OniMM OS) 
CCS » Color ChsumUt FLEX 



Ja ™ t 



South Xast 'Media 

5900 Cassano'TaSmitn W- - tfufon. Tit. 37343 



•• Shipping •• 

A« 1» U SJi. <«nlo. SJ.Se) 
Ker«leo Smttct Ato 5» 
Vortlea XJrnsll Add 10% 
OrC0.D.Sklp9ln|O«l; 



1)S.1l.«Tr.Jm»ilt..rWtnwwrn»aM.J.Jol» *KI IV .in I niH >X ,r, lutomiiki nl tJ.Bnh.l Syum. I „n«i».-.ti -MflMlS li . 1 r.itfn»ft of Sn. K Wl—r. Iimmil «>. 
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Mac-Golf 

By: Gloria Anchors 

Uniil I played MacGolf, Ihc closest 
1 'dcomc lo the actual game was looking 
atmy mom'sclubs in the car trunk. But 
even though I'd never chased a ball 
around the golf course, I did enjoy 
chasing it around ihc computer screen. 

Mac-Goir $59.95 
Available from: 
Practical Computer Applications 

1305 Jefferson HWY 
Champlin, Mn 55316 
(612)427-4789 
Phone Orders Accepted 

MacGolf (a game by Practical 
Computer Applicaiions) has excellent 
sound and graphics. With each stroke, 
the ball's flight is depicted in "real 
time" as it soars, lands, bounces, and 
rolls to a halt.. I learned to dread Ihc 
crash, thud, and splash as my misdi- 
rected ball went into trees, sandiraps, 
and water hazards (Out of bounds gets 
an "Oops!" and a missed put gets "ahs" 
from the gallery). 

The player gets to choose ihc front 
or back nine of two specially designed 
courses, and four others arc available 
from the company. Each well-designed 
hole is unique and interesting, closely 
resembling actual course layout with 
appropriate level of difficulty required. 
The multi-section screen shows hole 
layout, the golfer and his point of view. 




a table wiih wind speed and direction, 
distance, par, club, etc. You can choose 
the clubs, shot direction, strength of 
shot, and even the position of ihc 
golfer's feci. After each stroke, the 
ball's path is graphically plotted on the 
map of the hole, and ihc view window 
reconstructs itself lo show the ball's 
new position. Seasoned players have 
commented ihat the game requires as 
much conccniralion for each stiokc as 
ihc actual ouisidc golf game demands. 

If it's fast-paced action you want, 
MacGolf may not be for you. Like ils 
namesake, play is precise and con- 
trolled, icquiring skill and practice. 
Through repeated play you can learn to 
judge the proper direction and strength 
for ihc stroke, and gradually improve 
your score. 

The game's main weakness is the 
accompanying manual, which provides 
only sparse information and occasion- 
ally complicated instructions. While 



these instructions arc probably ade- 
quate for an experienced golfer, they 
leave the neophyte a little lost. For 
example, under "Club Selection" the 
manual says "Each club's distance is 
not documented in this manual to allow 
each golfer to develop his/hcrown indi- 
vidual style and experience." With 14 
clubs to choose from in categories like 
"woods" and "iions", a non-golfer 
NEEDS ihc documentation which the 
manual lacks. (I finally talked to a real 
golfer about club choice. Only then did 
I begin to have success with MacGolf.) 
Also I would like to sec some way of 
taking a mulligan, my husband says 
they arc an essential part of his game 
and for most all other golfers also. 

If you enjoy a challenge, if you've 
always wanted lo play golf but didn't 
want the exercise, or if you're a real 
golfer trapped inside by bad weather, 
try MacGolf. You can experience the 
frustration and exhilaration of the sport 
without the long walk to the green. 
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BILL WEST INCORPORATED 
1 74 Robert Treat Drive 
Milford.Conncciicul 06460 
203 878-9376 

Hopefully you arc reading this in the Januaiy issue of 68 
Micro. With ihc holiday season upon us and all kinds of things 
lo finish before the end of the year, this is being sent out at ihc 
last possible minute. Last month (or two months ago), 1 said I 
would discuss the Motorola I/O channel lo STD interface 
board we have developed at BW1, including a description of 
the circuitry used to connect the two different buses. As 1 start 
lo write this, it seems it will be better to first give a brief 
description of ihc I/O channel, and icvicw some products that 
use it. 

The Motorola Remote I/O Channel (R10C) is intended to 
allow the connection of inexpensive input and output devices 
to VME bus or other high pcrfoimancc computer systems. It 
is a very simple bus structure that includes 12 address lines (AO 
- A 1 1 ). eight bidirectional data lines (DO - D7), four priorit zed 
interrupt request lines (INT1* • 1NT4*), a data sirobc line 
(STB*) , a write line (WT*), a data acknowledge line 
(XACK*), a4MHzclock (CLK), and a reset line (10RES*). A 
"*" after a signal name indicates ihat the signal is active low. 
A system includes a single bus master and up to sixteen slave 
devices. The limitation on the numbcrof slaves is to ensure that 
ihc bus drivcis arc not overloaded. 

The I/O channel system bus, or "backplane", is typically 
a ribbon cable, although it may also be implemented as a 
regular PC-board type backplane. The cable may be a 50 
conductor or 64 conductor cable, and can extend as far as 1 2 
feet. The use of a 64 conductor cable allows the master lo 
supply S volt and positive and negative 12 volt power to slave 
pc boards. If slave subsystems have their own power supplies, 
the SOconductor cable carries all the data, address, and control 
signals. Thcsignalsarcarrangcdsoihat the SOconductorcablc 
is a subset of ihc 64 conductor cable, making it iclaii vcly easy 
lo interconnect the two types of slaves by splitting a 64 
conductor cable into a 50 conductor cable and a 14 conductor 
cable. Each slave is responsible for decoding and responding 
to iis own I/O address. 



Data transfers arc accomplished rather simply on the I/O 
channel. For a read cycle, the master scis up the address lines 
and ihcn asserts STB*. When the addressed slave has placed 
Ihc daiaonlhcdatalincs.thcslavcasscrlsXACK*. The master 
deassens STB* lo complete the cycle, followed by the slave 
dcasscrting XACK*. A write cycle is similar, except thai the 
master asserts WT* and puts the data to be written on the data 
lines before asserting STB*, and the slave asserts XACK* 
when it has latched the data from ihc data bus. Slaves may 
interrupt the master by driving one of the interrupt lines low. 
Each slave which generates interrupts must have a status 
register the master can read todctcrminc if the slave genera ted 
a particular interrupt The method of clearing an interrupt 
depends on the design of ihc particular slave, and may be 
accomplished by cither writing or reading a specified location. 
Interrupts arc normally also cleared whenever the master 
asserts IORES*. which initializes all the slave devices. The 
CLK line provides a nominal 4 MHz clock which may be used 
for liming purposes by ihc slave devices. Data transfers, 
however, arc asynchronous and do not depend on the CLK 
signal. For detailed specifications and liming information 
refer to ihc I/O Channel Specification Manual, Motorola 
publicaiion number M68R10CS/D2. 

Motorola provides a number of board level products that 
can serve as bus masters for ihc I/O channel. The M VME 104 
and the MVMEI 10 arc two VME bus processor boards ihat 
supportthc I/O channel. ThcMVMEl IOisa68000bascdCPU 
board that includes eight 28-pin sockets for EPROM and static 
RAM,a6850 ACIA,anda6840countcr/timcr. Thcboard will 
function as the system control Icr in a single C PU system, orcan 
be used in multi-processor systems. Rows A and C of the P2 
connector arc used for the I/O channel interlace. The 
MVME104 is one of the MVME105 family of CPU boards, 
and includes a 68010 processor, 512 Kbytes of dual-access 
dynamic RAM, two 28 pin sockets dedicated to EPROM and 
iwo 28 pin sockets lhai support sialic R AM ora real-time clock 
(Dallas Semiconductor type) as well as EPROM. A Zilog 
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Z8S30 is used lo provide two serial ports, one or which is 
configured as an RS232 device and the other as an RS485 
device. An MC68230 is used lo provide parallel I/O. Four 
timers arc included, of which ihrcc arc dedicated to hardware 
support functions including local bus timeout, V ME bus time- 
out, and watchdog timing. The board will function as a system 
controller, and includes the I/O channel interface on the P2 
connector. 

Ihc Motorola MVME3I6 is a dumb interface from the 
VME bus to the I/O channel. It allows an I/O channel to be 
added to any VME bus system, and allows direct access from 
a VME bus master to the devices on the I/O channel. The V IOP 
is a V ME board from Dual Systems Corporation that provides 
an intelligent interface to the I/O channel. Trie board includes 
a68000 processor, 512 Kbytcsofdynamic RAM, and two 28- 
pin sockets for EPROM. The board can act as a VME bus 
mastcrorsla vc.andlhc I/O channel may be accessed by ihcon- 
boanl 68000 ordircctly from the VME bus. Thcboard includes 
circuitry to cither generate or respond to VME bus interrupts. 

Motorola also provides boards that allow Vcrsabus sys- 
tems to use I/O channel peripherals. The VM02 is a 68000 
based board that includes 128 Kbytcsofdynamic RAM, two 
multiprotocol serial I/O ports, a 6840 countci/limcr, and two 
EPROM sockets, along with ihc I/O channel intcifacc. The 
VM03 is a 68010 based board that includes the I/O features of 
the VM02. with up to I megabyte of dynamic RAM, two 
EPROM sockets, and a 68451 memory management unit, 
along with an MCI468 18 real-time clock. 

The last system supporting the I/O channel I will discuss 
is probably the one of most interest to the majority of 68 Micro 
readers. The SBC-BA bus adapter allows the G MX Micro-20 
single board computer to use I/O channel peripherals. The 
Micro-20 is used in a number of systems that have been 
advertised in 68 Micro. The adapter board is a piggy -back 
board that interfaces the I/O expansion connector on the 
Micro-20 to the I/O channel, and allows devices on the I/O 
channel to be directly addressed by the 68020on the Micro-20. 
The SBC-BA provides the Micro-20 with a full I/O channel 
interface, with the exception that only two of the interrupt 
request lines can be supported by the Micro-20 expansion 
connector. 



The above described systems all provide a user with a 
great deal of computing power. Ihc inclusion of the I/O 
channel interface seems to provide a means to add a variety of 
I/O interfaces. Unfortunately, the I/O channel has not been 
well supported by manufacturers other than Motorola, and 
even Motorola provides only a limited number of boards for it. 
As 1 have mentioned in previous articles, the STD bus provides 
a wide range of I/O boards, at very reasonable prices. B WI has 
designed a board , the STD-R IOC. that allows users of systems 
that support the I/O channel lo take advantage of the I/O boards 
that arc available on the STD bus. Up to four STD caid cages 
may be connected to an I/O channel system. The STD-RIOC 
allows the use of both memory-mapped and I/O-mappcd 
devices on the STD bus. and can support all of the varieties of 
the STD bus. The interface card provides for the generation of 
the XACK* signal. and allows STD bus interrupts to be passed 
over the I/O channel to the main processor. 

The fact that the I/O channel can use a ribbon cable to 
interconnect various subsystems allows system configurations 
that arc not possible with a typical PC-board backplane. Often 
it is necessary to minimize cable lengths in instrumentation 
type applications using digital to analog or analog to digital 
convenors. Other applications simply require many digital 
control lines that can be difficult to cable back to the main 
processor. The use of an STD bus I/O subsystem allows the 
placement of the interface cards in close physical proximity to 
the devices being monitored or controlled. A single ribbon 
cable up lo 12 feci in length is used to connect the I/O 
subsystem to the main processor. 

Since I want to get this article in the mail. I am going to slop 
at this point. Next month I plan to discuss the design of the 
STD-RIOC. Much of the design is implemented with PALs 
(Programmable Array Logic). If you arc unfamiliar with 
Boolean algebra, you might find it useful to review the recent 
"Logically Speaking" columns in this magazine by Bob Jones. 
The easiest and clearest way to implement a design based on 
PALs is with Ihc kind of tools Bob has been describing. 

(PAL is a trademark of Monolithic Mcmoiics.) 
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Which Computer 

This may come to some of you as a bit of a disappoint* 
menl. as II does to me. I was sitting the other day 
contemplating all the computers that I use or have 
used, and consciously trying to decide which Is now my 
favorite. I guess llrst of all, I should warn readers that 
most computer users place availabllltyof software high 
on their list of reasons to purchase a certain brand or 
compatibility of computer. I am not the 'standard" 
computer user by any stretch ofthe Imagination, since 

I would change hobbles and llelds of work If I were 
forced to use a computer for accounting. Inventory, or 
spreadsheet applications. That leaves only word proc- 
essing In the picsent "traditional" computer applica- 
tion areas, and I do weigh the availability of a good text 
editor and formatter rather highly. In fact I rank these 
as so important that I have written my own and adapted 

II to a number of computer configurations, so that more 
or less becomes a smaller factor also. 

Just what then do I look for In determining which is 
my "favorite" computer"? In giving It some thought. I'd 
have to say that my choice Is almost strictly based on 
performance. I'd rather do about anything than sit and 
wait for my computer to catch up with me. With that in 
mind, I'll mention the computers to which I have been 
exposed lately and then rank them. I have to start out 
by saying that I have had a 6800 or 6809 based system 
for over ten years now (hardly seems possible. Don) (J 
Jeel (he same way. Ron - DMW). I've run Motorola 
development systems and SWTPc systems, and I've 
watched others running CIMIX (now CMX) systems. 
PresenlJy I have access to. and can run an old Tandy 
Color Computer, an Atari 800 (almost entirely for 
games), a Tandy 1200-HD. a Tandy 3000 with hard 
disk, a Mustang 68020 system, and a Peripheral Tech- 
nology 68008 board with enough hardwarearound It to 
make it theequlvalent ofthe Muslang-08 system. First, 
let's throw out the old Color Computer as having been 
a toy from the start, though It could have been a very 
capable system had Tandy chosen to do things Just a 
Utile bit diirerenUy. Then, as I said, the Atari Is for 
games, and I don't have much to go with It. Just the disk 
drive. 

Well, as I said. I must base my llrst choice on which 
machine I prefer to use to do what I do most. What do 
I do most? I spend about 70% of my computing lime 



NOTES 



writing and modifying programs In a high level lan- 
guage. In other words editing text flies, compiling and 
debugging programs. Perhaps half of the 70% Is 
directly involved with editing the source files In writing 
the program. The other half Is spent debugging, but 
about half of that time Is spent changing the source file 
that I have already written. The remaining 30% of my 
computer time Is spent In woid processing, also editing 
text files. I've noticed lately that when I come home, 
where I have been keeping the Mustang 68020 (which 
belongs to the company) I'd rather turn thaton than the 
old 6809 system. At work I reach for the 68008 system 
over the 6809 system. Both those choices are of course 
contingent on whether I can do what I am about to do 
on that system. 

There are a couple of reasons that I prefer those 
systems. Probably the most pertinent one Is that they 
have modem hard disk systems attached, and they can 
read a large file in veiy short times. The other reason, 
however, has little to do with disk and file access. II Is 
largely a matter of higher performance in editing a file. 
The 68XXX systems can search for a string in a veiy 
long file, and seemingly go there without waiting. The 
68020 In particular Is instantaneous in its response 
when I tell II lo do something. Both of the 68XXX 
systems also have another advantage over the 6809 
systems. Ihey have the capabllltyofedltlng VERY large 
(lies. I use a buffer of 1 00K on both those systems, and 
I can edit the whole PAT editor source file of 66K or so. 
On the 6809 system, the buffer Is Just about 29K and 
there Is no hope of Increasing that without resorting to 
virtual memoiy or paging, something I have never set 
up on the 6809 systems. 

Another consideration for me is that the program that 
I have written generally gets compiled a number of 
times In the process of debugging It. 1 like the 68XXX 
systems because the compilers compile much faster on 
them. What takes several minutes on the 6809 takes 
only one on the 68XXX systems. Here again. If I can do 
what I have to do on those systems, they are my strong 
first choice. 

You might ask about the IBM clones and how they 
rate. First (this Is primarily my own private strong 
opinion), let me say that I have not found any editor I 
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consider veiy good. Some of them splash garbage all 
over the screen. Others di Ive me crazy with snow eveiy 
time I type a character and have annoying features like 
having to extend my edit file with blank lines before I 
can add to the end of my text. StLU others are large In 
the extreme though they have enough features so that 
a user can do almost anything with them. Of course 
editor evaluation Is a HIGHLY SUBJECTIVE activity. 
What strikes me as extremely useful, you might con- 
sider thlid rate, and vice versa. I like uncluttered 
screens, use of control keys rather than function keys, 
and simplicity. Aside from those considerations, the 
Tandy 1200 exhibits performance substantially poorer 
than the 2 MHz 6809 system. TSC Extended BASIC Is 
considerably faster than CW BASIC run on the 1200. 
Running something like MSC's PAL (Finite Element 
Analysis Pi ogram) on the 1 200 Is agony with waiting for 
results. The 3000 on the other hand with Its 80286 and 
80287 co-processor Is veiy fast In lhe engineering 
program execution, and had It a good editor and the 
ability to generate code for my primary work. I would be 
quite happy with II. As It Is, I use It happily to run the 
software that 1 need to run that Is not available for the 
68XXX or 6809 systems, primarily Wlntek's SmArl- 
work for PC board development, MSC's PAL for struc- 
tural analysis, and, though I don't get Involved myself 
In AutoCad. it Is used a great deal of the lime for that 
program, to do PC board component layouts and sche- 
matics. The 1200 Is downright frustrating for AutoCad. 
and the 3000 Is tolerable. 

My preference for the fastest processor, which gives 
me Instant response, brings up an Interesting point. 
Suppose there were two or three other users on that 
68020 system? By actual test. Just putting another 
termlnalon that system and logging In on It, Introduces 
a fair amount of overhead strain on the system. Put 
three or four useison that system, and my choice would 
be to switch to the less expensive 68008 system and be 
the sole user. 

As I said at the beginning of this. I am a bit disap- 
pointed at the coming of the end of the first era of 
microcomputing. The fact Is that that era came to an 
end some lime ago for most of the early computer 
systems, but folks like me who grew up on a system 
were slow to let go. For example, (hough Apple has 
Introduced several new lines, the old Apple II continued 
for a long time to be their bread and butter in spite of 
their dibits to stop producing the things. In my "work" 
projects we are rapidly using up the entire memoiy map 
of the 6809 and I don't have to tell any computer user 
that soltware and Its capabilities are getting bigger and 
not smaller. We will soon outgrow the 64K memoiy map 
of the 6809, and when thai happens, why bother with 
any kind of memoiy paging scheme? There is an 
advantage In going to a "modern" processor In that we 
can then advertize "new 16 bit processor for Increased 
perlbrmance and capability". We won't go with the 
68020 and I won't say that we have the "stale of the art" 
system. What was the slate of the art 2 years ago has 
settled down Into being something very useful at a 
much more reasonable cost. 



About here I have to back up and tell a story for many 
of you who have started subscribing to '68' Mlcio 
Journal recently. Those of you who have read this 
before can skip a few paragraphs. Back when I first got 
Involved in applying 6800 processors to measurement 
and control applications, we had a single choice of 
programming languages, assembler. After doing a few 
piograms, admittedly with little style and structure, 1 
decided that my quest would be for a higher level 
language that would be efficient enough to use for our 
applications. That Is. we couldn't sacrifice a speed 
factor of ten nor a growth In the size of the object code 
by a factor of Rve. The first compilers that I got my 
hands on were disappointing In both of these lespects. 

About the time the 6809 came along and we made the 
switch, things got more promising. The first non-toy 
Pascal compiler came along, and It was followed by a 
rush of others. About that lime over the peilod of a year 
or two. each new compiler that came out seemed to 
belter the performance of the others then available. 1 
watched the execution time drop over that peilod as 
programmers learned how to take advantage of the 
6809 instruction set, by a factor of Just about ten. At 
the same time, each new compiler generated less and 
less code to do the functionally Identical program. Not 
only did the new compilers generate less code that ran 
faster, Ihey did the compiling Job faster and faster. It 
was an exciting lime, and I was busily writing columns 
for this magazine and finding myself with one of eveiy- 
thlng new that came along, so I could test It. f Ihanks. 
Don). 

I learned to piogram In some "languages" that were 
absolutely one of a kind, though most of them weie 
subsets of Pascal. As I think back, we had a lot of 
extended discussion as lo "Assembler Is best" vs "High 
Level language Is Best", largely thanks to Dan Fams- 
woith who admirably defended Assembler. Somewhere 
In the midst of all this, I learned a good deal about 
structured programming and willing code modularly, 
and I realize that these techniques can be applied to 
Assembler code as well as programs written In Pascal or 
C, but assembler programmers usually don't make the 
application (Dan Famsworth is a notable exception). I 
argued thai the modular programming that made It so 
easy for Dan to piogram In assembler was equally 
applicable lo programming tn Pascal or C or PL/9 or 
Whimsical or PASC or Forth, or any number of other 
languages Including BASIC. 

When I first switched from assembler to Pascal for my 
programs. I noted a great reduction In the time It took 
me to write a program and get It working. Now as I look 
back. I think It was more the fact that the higher level 
languages helped me to learn how to program In a 
structured manner than that It was so much easier to 
wille the program In the higher level language. I say this 
because now when I do program In assembler, I don't 
find It nearly as difficult as 1 did way back befoie there 
were any higher level languages. Part of the "HLL Is 
caster" feeling I had was because I was Improving my 
programming skills lapldly about the time I made the 
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switch. Though I think there Is less typing involved In 
wilting in a higher level language, some of my readers 
have disputed that, and I have to admit that for some 
kinds of programs the dlllerence is not large, though In 
applications In which there Is a lot of number crunch- 
ing, the higher level language wins by a wide margin. 

I bring all this up again because I llnd myself back In 
the same situation as several years ago with respect to 
the 68XXX systems, that Is. searching Tor the best 
combination of hardware, operating system, and soft- 
ware. First let me say that both of the 68XXX systems 
run the OS9 operating systems, and that OS9 Is a fine 
operating system for running a computer with multi- 
user and multi-tasking capabilities. Such a system Is 
ideal for a medium sized company In the area of 
inventory control or accounting where the primary use 
is for data storage and retrieval and in cases where a 
dozen terminals sit In an office and earh have about a 
5% usage factor. People who need to retrieve data from 
a computer a few times a day don't mind walling tens 
of seconds for an answer on their terminal. At worst, 
they lose few minutes a day. 

On the other hand, two or three workers at the 
company where I work sit virtually all day and program. 
The full and undivided attention of a 68XXX processor 
Is not loo much power when one of these people Is 
editing or compiling a 50 page program. These veiy 
productive and expensive people are paid to write 
programs, not to wall for computers to llnlsh compiling 
them. To split the computing capability of the proces- 
sor even two ways would be foolish. Of course we can 
purchase more systems and use them In the single user 
mode with OS9. and that is what we are doing pres- 
ently. We calculate that If we can Increase the through- 
put of two programmers by 10% by adding another 
system, the system will be paid for within a year, a 
pretty good return on Investment. 

SK'DOS 

There is a single user operating system available for 
the 68008 system. It Is SK'DOS by Peter Stark. 
SK'DOS could be described as a grown up version of 
FLEX though it Is unrelated to FLEX in terms of 
authorship. At this point, the problem with Die 68008 
system and SK'DOS is that there is very Utile software 
available to run under SK'DOS. I see the use of that 
operating system as most practical for development of 
software for stand-alone applications. With this in 
mind, 1 recently wrote a letter to John Spray, who some 
of you longtime readers might recognize as the author 
of a very nice language called Whimsical for the 6809. 
Our company has commissioned John to write us a 
68000 version of Whimsical to run under SK'DOS. 
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After we have Ihebugsoul, John will be selling it for use 
by SK'DOS owners. I am hoping its availability in 6 
months or so will help get SK'DOS off the ground. 

Incidentally, I don't see OS9 and SK'DOS as competi- 
tive products. Each has Us place. The capabilities of 
OS9 are large and it Is at the high end of Die perform- 
ance scale when linked with the 68020. Certainly 
anyone who needs computing power and speed Is well 
advised to go that loute. However, there are still a few 
hobbyists around, who llnd the 68020 systems and 
OS9 out of their price range. I don't believe that the 
hobbyist market has disappeared. 1 think the depth of 
that market was greatly overestimated long ago. but 
there axe still numbers of us who work with computers 
during the day. and would like something of our own 
with similar capabilities. Put SK'DOS on a 68008 
single board computer system such as that made by 
Peripheral Technology (offered as a complete system, 
the Mustang 08-A by Data Comp), and you are begin- 
ning to reach the price level where hobbyists will again 
be interested. 

Cetttng a new Operating System off the ground Is a 
difficult thing. Nobody will buy an O.S. for which there 
Is no software, and software writers won't write soft- 
ware for an O.S. that hasn't sold veiy many copies. It 
is my hope that this project will start the ball rolling and 
give SK'DOS a little more momentum. Of course as 
soon as the compiler Is available. I will translate PAT 
once again so that 1 can use my favorite editor. There 
will be at least two other editors available for SK'DOS 
by then, and there is an Assembler already available. 
The combination ought to be enough to gel things 
started. It is enough to get those of us who were 
computer hobbyists back ten years ago, excited all over 
again. 

Editor's Note: In the near future there will be available 
a 68000 card that runs SK'DOS and Jits tnstde and on 
the backplane of an XT/ AT clone cabinet. This means U 
will accept those very Inexpensive I/O. haid disk 
systems and other tow priced, mass produced cards and 
boards that run In those systems. That should make a 
more economical system available. Also I understand 
that OS 9 68K will be ported In the near future. I have 
hope that we can continue to serve those who cannot 
afford an annorlegfora 68XXX system. However, if you 
really want to get down to 'rock bottom prices", the 
Mustang-08A is otilainly worth your looking into. With 
either OS-9 or SK'DOS. or even better - both! And it Is 
hew now. 

DMW 
EOF 
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Forth 



A Tutorial Series 



By: R. D. Lurie 
9 Linda Street 



A REAL- WORLD PROBLEM 

I thought that I would stait oft this month 
with a description of a real-world engineering 
problem I once had to solve. At the time. I was 
responsible Tor establishing computer control of 
all of the suitable instruments In a testing labo- 
ratoiy devoted to quality control and new prod- 
uct development In a plastics company. The 
problem at hand was one of taking the data from 
a liquid chromatography apparatus (it deter- 
mined the molecular weight distribution of 
sample of polystyrene). Unfortunately, the envi- 
ronment was veiy electrically noisy from all of the 
motors, lights, and other instruments which 
switched on and off at unpredictable times. 

Data were taken wllh an 8-bit A/D converter 
In a CIMIX 6800 computer (before the days of the 
6809). Since each test sequence ran about 40 
minutes. I decided to take a data point every 30 
seconds and store each point In an array. The 
data would be processed and the test results 
calculated in the 4 minutes between tests. A 
group of tests was to be started about noon, and 
run automatically Into the night, with the results 
to be ready the next morning as hard copy. 

The technician had been running the tests 
and tracing the instrument's output on a strip- 
chart recorder. It took about 70- 80 minutes to do 
each calculation from the data on the recorder, 
and the reproducibility was barely acceptable. 
You can see from this the Incentive to go with the 
computer! 

Finally, the great day arrived and we were 
ready to make our first test of the computer 
system. After the test was lun, we looked at the 
results. Much to our horror and chagrin, the the 
data taken by the computer looked much like 
Figure 1. 

Of course, everybody. Including me. had 
expected the data to resemble that taken by the 
strip-chart recorder, and not like shotgun target 
practice. As soon as I saw the test result. I did 
what any computer whiz would do — I lied! I 



>• 

n 
it 
a 

M 

33 • 

32 - 

31 • 

30 

!•> • 

?> ' 



Fiqfln l— *-Q*t* At oriQlruLly r*c*lv*d. 



■ » 

II 

'<• 
II 
■'• 
" 
M 
>: 
is 
.* 
.> 
n 

If 



assured all and sundiy that the problem was a 
mere detail which would be fixed immediately. 
Luckily. I was right. 

After a couple of hours of hard thinking, it 
dawned on me that the strip-chart recorder had 
such a slow response time, compared to the 
computer, that, for practical purposes. It was 
averaging the data over a finite Interval. In this 
way. it was averaging- out the noise pulses which 
were masking the data the computer was sup- 
posed to be reading. In other words, the com- 
puter was. for practical purposes, taking an in- 
stantaneous algebraic sum of the true data and 
what ever noise pulse which happened to occur 
atthesametime.Therefore.toftxtheproblem.au 
I had to do was make the computer appear to be 
a highly dampened strip-chart recorder. I accom- 
plished this by taking 50 measurements, at 
about 4 per second, and averaging the results. 
This produced the data shown in Figure 2. 

The data in Figure 2 aie only a small portion 
of the whole cuive. but I won't bore you with 
those details, right now. In case you are curious. 
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the vertical scale Is simply 0-255. which Is the 
output from the 8-blt A/D converter. The hori- 
zontal scale is Just the data count, from l to 
whenever the test was automatically terminated 
by the computer, based on a complex real-time 
analysis of the test data. Its only requirement 
was that it be uniform In time, with no interest at 
all In th e actual amount of time, J ust its linearity. 
What has this got to do with FORTH? Not 
much, since the program I have been describing 
was written In BASIC. However, FORTH is often 
used for this type of application, and I almost did 
so, but I was still too new to FORTH to have 
enough confidence in my programming skill to 
attempt It In FORTH. Still, it Is a good example of 
a software "brute-force" line filter algorithm: and 
It should be considered as a viable possibility in 
any Instrumentation application. 

SOME USEFUL DEFINITIONS 

I have had occasion to encounter several un- 
defined words in the FORTH literature. In the 
majority of cases, I have no idea of the original 
source, and the definition given Is my own ver- 
sion, which may not be the most efficient, but it 



does work as expected. 

The first definition is for \ . This is a some- 
what limited replacement for the (...) normally 
used to enclose a comment. I like It because It Is 
easter to use when you only need one comment 
on a line. Everything following the \ is treated as 
a comment by the comptler, so you have to be 
judicious In its use. 

It operates this way. The >IN © fetches the 
current character count as of the \ and places 
this value on the Data Stack. This number is 
divided by 64 and the Integer quotient is left on 
the Data Stack. This number Is incremented by 
1 In order to protect against the quotient being 0. 
as It would be for the first line on the screen. This 
number is then multiplied by 64 and stored back 
Into >IN . This forces the compiler to conclude 
that It has already come to the end of a line and 
to skip down to the beginning ofthe next line, The 
64 is used because that is the normal length of a 
line on a FORTH screen. Change it to 32 for 
Stems' FORTH, for example. The definition must 
be made IMMEDIATE in order to force execution, 
instead of compilation. 

Only one \ will be ef lectlve per line, and there 
Is no terminating delimiter required. 

The next 4 definitions should be considered 
as a group, since they are really extensions ofthe 
common comparisons. NOT may not be neces- 
sary, as it is often provided, except In the strictest 
copy of flg-FORTI •[. However. NOThas often been 
defined a equivalent to 0= , and that is simply 
incorrect. If you already have a definition of NOT 
. then Just skip it. and go on to >= , etc. 

These three comparisons work by doing the 
opposite Job and then complementing the 
Boolean result. Their major advantage Is in 
improving the readability of a FORTH definition, 
rather than doing anything novel. 

THE INDEX UTILITY 

INDEX Is a very useful word missing from 
FF9 and several other versions of FORTH that I 
have seen lately. Since it is so useful, I have 
included here the INDEX that I wrote for my own 
use. I have modified It slightly to make It easier to 
understand. 

The INDEX utility is used to scan through a 
list of consecutive screens on disk and print only 
the first line [line #0). This line is often reserved 
as a comment line describing what is to be found 
on the rest of the screen. 

INDEX actually consists of two definitions, 
.LTNE#0 and INDEX . The only reason for break- 
ing out .LINE#0 was to make it available to other 
definitions; otherwise. It could have been left as 
part of INDEX . 
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You enter INDEX with the lower and upper 
screen limits already on the Data Stack. In that 
order. INDEX first Increments the upper screen 
number by 1. and then exchanges the two 
numbers on the Data Stack. This places them In 
the proper order to be recognized by a conven- 
tional DO ... LOOP . It also allows us to use the 
DO ... LOOP tndex l as the number to be printed 
as the screen Identifier. 

Within the DO ... LOOP . the first action Is to 
use CR to send a carriage return/line feed to Ihe 
display device or printer. The DO .. . LOOP Index. 
I . Is then called and printed In a 3-column field 
(this field size will have to be changed ill ever go 
to a hard-disk).- 

Next, I Is called again, before transferring 
operation to .LINE#0 . 1 has to be called at this 
time, because the DO ... LOOP Index Is masked 
by the return address left by the Jump to .LINE#0 
. This Is a problem often encountered by FORTH 
beginners, since most documentation does not 
make It clear that the DO ... LOOP Index value Is 
stored on the Return Stack. Therefore, it is not 
available to subroutines without some non-stan- 
dard programming gymnastics— a practice to be 
strongly discouraged!. 

.LINE#0 Is entered with the screen number 
on the Data Stack where It Is ready for BLOCK . 
BLOCK reads the Indicated screen from the disk 
(If It Is not already in memory), and places the 
address of the screen buffer on the Data Stack. 
The 64 is the "count" expected by TYPE . Ihe - 
TRAILING simply chops off the trailing spaces 
from the line so that time Is not wasted by 1YPE 
in displaying unnecessary characters. Only one 
line Is to be printed, so program control returns 
to INDEX . The last line has the effect or a "panic 
button". ?BRK tests the keyboard for any Input 
and returns the appropriate Boolean flag. If the 
flag was TRUE . the DO ... LOOP execution 
pauses and waits for another key stroke. A 
<RETURN> aborts the operation and returns 
control to the operator; any other key causes 
operation to resume. 

?BRK Is not a standard word, so I have 
Included the definition written by Wilson Feder- 
lcl for FF9. ?BRK contains the non- standard 
word ?KEY. which Is defined here In such a way 
that It can only be used In FF9: however, the 
standard word 7TERMINAL should produce the 
same results. Anyone who finds otherwise. 
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please let me know so that I can look for a 
convenient alternate. 

ASSEMBLY LANGUAGE INSIDE FORTH 

The last example of FORrH usage tnvolves 
Assembly language. Most of the time, there is no 
need for one to use anything but high- level 
FORTH definitions; however, there are times 
when It Is the lesser of a set of evils. 

I encountered such a case when I wanted to 
send control codes to my printer. FLEX just does 
not let many control codes through the normal 
output channel. Therefore, all of my <ESC> 
sequences were being filtered out before they 
ever reached the printer: a case of someone 
protecting me from myself! I don't like that any- 
time, but, particularly, when it comes to com- 
puter programs. 

instead of fighting with FLEX alternate vec- 
tors, or some other such machination. I decided 
to do the job the easy way by bypassing FLEX 
completely. To do this. I wrote the simple inter- 
face software In FORTH Assembly language for- 
mat shown as >PRINTER . By using this word 
only for special control codes. I was still able to 
stay within the spirit of FLEX, but siill retain the 
output flexibility I needed. 

This definition of >PRINTER is written in the 
format required by FF9. but 1 think that it Is 
pretty much the same for any other version of 
FORTH for the 68xx family. Notice that the 
definition opens with the word CODE . Instead of 
the : that we normally expect. This, ofcourse. Is 
to signal the Assembler to process the definition. 

Notice, also, that the definition ends with 
NEXr. END-CODE instead or the familiar ; . The 
NEXr. Is a macro which does essentially the 
same thing as : at the end of a definition, and 
END-CODE is the signal that the Assembler is no 
longer needed by this definition. 

The only other part of the definition which 
might not be obvious to everyone Is HERE 5 - EQ 
BRA . This is equivalent to the possibly more 
familiar mnemonic BEQ *-5 In the Infix notation 
used by Motorola, etc. It means that the branch 
ts to a position 5 bytes before the next program 
counter value. 
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BACH ON A BUDGET 



An Introduction to Computer Music 
by Joseph D. Condon 
8072 172nd StreciW. 
Lakcvillc, MN 55044 

If you would like 10 experiment with computer generated 
music but cannot afford to spend aloi of money on hardware 
or software then you should consider implementing thismusic 
system. The hardware required for this system can be easily 
assembled in acouplc of hours for less than five dollars and the 
software is free. This system is capable of reproducing the 
sound of almost any musical instrument, real or imaginary. 
You can play a full range of octaves with up to four different 
notes sounding simultaneously. I have transcribed scvcial 
Bach and Mozart minuets directly from music store publica- 
tions in less than a couple of hours with very little cf foil. These 
minuets arc given in listings 4, 5 and 6. Once the music has 
been entered into your system using the tcxicdiior, you simply 
assemble it and then play it. 

The software required for the music system is written for 
the FLEX9 operating system and requires the standard TSC 
assembler and basic language. The software also requires 
some type of parallel output port. A printer port will work just 
fine. The device that actually creates the sound is a simple 
digital to analog converter that requires no power supply and 
can be built with a few standard resistors, a capacitor, and a 
potentiometer. The output from the DAC must then be fed into 
some type of amplifier and speaker system. The complete 
schematic forthc DAC is shown in figure 1 . You can build the 
DAC in a sepcraie box or you can attach it directly to one of 
your parallel ports inside your computer. How you decide to 
implement the hardware is entirely up to you. If you arc not 
familiar with your systems hardware, I would recomend that 
you seek assistance from someone who is. 

The sound fidelity of this system is a function of the time 
required to perform the loop within the "SOUND" subroutine 
contained in the music macro file. In theory, the highest 
frequency that can be produced without distortion is equal to 
one half the reciprocal of the time required to perform the loop 
within the "SOUND" subroutine. The actual loop time in the 
"SOUND" subroutine iscurrcntly 305 usee fora 1 mhzsystcm 
clock. This means that the highest frequency that can be 
produced without distortion is approximately 1639 hz. All 
frequencies higher than this will contain some amount of 
distortion. Although the distortion is noticablc, it is not totally 
objectionable. 

To generate a music program you will require a m inimum 
of four text files. One of the files describe the musical 
instruments tonal qualities, another file describes the instru- 
ments amplitude envelope. The third file is the music macro 




file and the fourth file is the actual text of the musical 
composition. 

The tone file is created by a simple basic program given 
in listing 1 . Whc n executed, the program requires you to enter 
the harmonic composition of the particular instrument that 
you wish to reproduce. To reproduce the sound of a harpsi- 
chord, you might specify five harmonics with amplitudes of 
1, .8, .6, .4 and .2 respectively. The program will then create 
a text file which describes the tonal qualities of the harpsi- 
chord. 

The envelope file is created by the basic program shown 
in listing 2. This particular program will generate an envelope 
file for a harpsichord which has a shaip attack rate followed by 
a constant linear decay in amplitude. If you want to describe 
the envelope for a different instrument, you will have to 
change the program between lines 40 and 60 inclusive. 

There have been many books and magazine articles 
published describing the tone and envelopes generated by 
different musical instruments therefore 1 will not attempt to 
cover the subject in this article. By experimenting and using 
a little comman sense, you should be able to come up with 
some very interesting instrument sounds. 

The music macro file, shown in listing 3, is the key to the 
music systems software. It enables the assembler to generate 
an executable music program from the tone, envelope, and 
composition text files. The theory and maihamctical compu- 
tations used within and by the macro file become quite 
complex but it is not necessary for you to understand exactly 
how it works to be able to use it. The music macro file needs 
only to be included as a library file within the composition file 
and the assembler will do all the work for you. 

The last file to be described is the actual composition text 
file. This file tells the assembler what tone and envelope files 
you wish to use to describe an instruments voice. You may 
change the instruments voice in the middle of a composition, 
first part organ, second part piano or whatever. You can 
change the voice as often as you like during the composition 
with the "voice" instruction followed by the name of the tone 
and envelope files you want to use to describe the instruments 
voice. All tone and envelope files referenced by the voice 
instruction must be included in the composition file by the use 
of the assemblers library command. 
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The first instruction in a composition file should be the 
"ink" instruction. This instruction initializes the DAC port on 
your system. You will probably have to change the address of 
the DAC specified in the music macro Hie to match the address 
of the P1A port you decide to use on your system. The first 
instruction in the composition file must also contain a label 
name as shown in the example. 

The "clock" instruction is used to tell the system what 
speed the processor is running at since this has a direct effect 
on the pitch of the notes being played. The acceptable values 
arc "1" or "2". If the clock instruction is not specified, the 
system will default to 1 mhz.Thc speed of your systems clock 
will also affect the tempo at which the music will be played. 
If your systems clock is 2 mhz you should cut the tempo value 
in half for normal play back speed. 

The "tempo" instruction describes how quickly the notes 
in the composition arc to be played. The value of the tempo can 
be between 1 and 9 inclusive. 1 is the slowest and 9 is the 
fastest. A tempo of 5 is typical. 

The "octave" instruction describes the octaves you will 
be using in the composition. Typically 2,3,4,5 and 6 fora live 
octave range. Each octave instruction can specify up to 9 
octaves and the octave instruction can be used several times if 
needed, provided you do not specify the same octave more 
than once. The number of octaves specified have no effect on 
the size of the program generated but do have a slight effect on 
the assembly time. 

lite "note" instruction is used to describe up to four notes 
in pitch and duration to be played at a specific time. Individual 
notes arc described using the characters a-f followed by a "s" 
or"f" if the note is a sharp or a flat followed by a value used 
to indicate the notes octave, lite note is then followed by a 
comma and a value indicating the notes length. When the 
shot test note of the group completes, the next instruction will 
be executed. If the next instruction is also a note instruction . 
the previous notes which have not completed will continue to 
sound until! they eventually come to there conclusion which 
may be several note instructions later, litis allows the combi- 
nation of up to four different length notes of different pilch to 
be sounding at any one lime. If a note is changed before it is 
allowed to complete, it will be chopped off and the new note 
will begin to sound in its place. In general it is best to think of 
the four possible notes as four individual sound generators. If 
you do not want to chop off a note that is still sounding, you 
should not specify a new value for that sound generator un till 
its current note has come to completion. You can do this by 
omitting thatnotc in the next note instruction if the note is the 
lastonc to be specified in the note instruction line or you can 
use the "mil" note description if it is not the last note for the 
paiticular note instruction. When playing groups of different 
length notes, it is best to enter the shortest notes first on the 
note instruction line. 



The length of any note can be 1/64, 1/32. 1/16, 1/8, 1/4, 
1/2, 3/4 or 1. The actual amount of lime required to play a note 
is a function of the tempo value specified by the "tempo" 
instruction. 1hc "rest" instruction simply waits a specified 
amount of time before continuing on to the next instruction. 
The rest instruction will also terminate the sounding of the 
first note specified in the previous note instruction if it has not 
already come to completion. 

The "perform" and "return" instructions arc used to 
repeat a score multiple times without having to reenter the 
scores text each time you wish to play it. The "stop" instruc- 
tion is used to terminate the program and return system control 
to FLEX. The last instruction of any compostiion is"cnd". The 
end instruction must be followed by the name of the label 
assigned to the first instruction ("ink") described earlier. 

By studying the program examples and experimenting, 
you should be able to easily master the music programing 
language. When assembling a music program you should 
disable the list option using the assembler directive +L in the 
initiating message. Although the example programs appear to 
be very short, during assembly time they may expand to over 
4 thousand lines of source code. Thais enough to wear out a 
CRT not to mention a printer. 

A word of caution. 1 he main objectives of this music 
system arc maximum flexibility and functionality wilh mini- 
mum hardware and software requirements. This system is by 
no means intended for someone who is not familiar with their 
systems hardware or assembly language programing. 
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11 


> > 

I 1 






LISTING 


• 3 






play 


clr exitf 


0»t» bit 1 e— /\/\/V\— 


I I 


















ldx wpnt 
ldy epnt 


HI 


> » 

1 ! 


opt exp 












playl 


Ida 
Ida 


wldxl 
a,x 


• (— — ■■" 

* ( 














111 

n>»» kit fl m JWW\/\ — 




) • 
















ldb 


eldxl 


ff!VMp4 




•( 




Music Programing 




ldb 

Mil 


b.y 


4*4 

LISTING 11 




Language 

)* 














fflUl 

anda maskl 






M 
















st a 


sound 


10 INPUT "ENTER TONE 


FILE NM42",N$ 


)* 
M 










by 






Ida 
Ida 


wldx2 


20 OPEN NEW NS*".TXT* 


AS 1 


)• 
















a,x 


30 DIM M(255) 




*( 








Joe 


Condon 




ldb 
ldb 

mil 


eidx2 

b,y 


40 INPUT 'ENTER HIGHEST HARMONIC", N 


)* 
















50 DIM A<N) r P<N) 




M 


















60 PRINT 'ENTER AMPLITUDE ARRAY* 


)• 
















anda mask2 


70 FOR I-l TO N 




*( 








01/29/85 




adda sound 


60 INPUT A(I) 




)* 
















ata 


sauna 


90 P(I)-2*PI*I/N 




M 
















Ida 


widx3 


100 NEXT I 




)* 
















Ida 




110 H-0 
120 L.0 




















a,x 




















ldb 


eldx3 


130 FOR 1-0 TO 255 




DAC equ SE010 












ldb 

mul 


b,y 


140 H(I)-0 




HARMS 


equ 


SCD03 












ISO FOR J-l TO N 




















anda nask3 
adda sound 


160 W(I)-«(I)+A(J)*SIN((2*PI/ 


CLK set 1 














255)«I*J+P(J>) 




TMPO 


Mt 5 












sta 


so una 


170 NEXT J 




PREIC 


set 


256 












Ida 

Ida 




ISO IF WU)-K THEN H-K(I) 


















widx4 


190 IF WIIXL THEN L- 


■w(r> 


org 


3 














a, x 


200 NEXT I 

210 M-l/iH-L) 

220 FOR 1-128 to 255 




* i— — . 
















ldb 
ldb 


eidx4 
b.y 




•( Temporary 


Storage 


for 


Play 




mul 




230 tt-wa) *M 




Subroutine 












anda IwiH 


240 PRINT * FCC*;INT(63*W)+64 
250 PRINT #1, * pcC*■ TW ' 1 ■" : ' , * u, -* fi 4 


















adda sound 
sta DAC 


260 NEXT I 




i 




















270 PRINT NS; 




wpnt 


cmb 2 












ldd 


wldxl 


2 SO PRINT 11, NS; 




epnt 


crab 2 












addd wind 


290 FOR 1-0 to 127 




















std 


widxl 


300 »-"(I)*M 




exitf 


feb 















ldd 


eidxl 


310 PRINT * FCC";INT(63*W>+64 


sound 


feb 















addd eincl 


320 PRINT 11, * FCC" 


INT(63*W)+64 


















std 


eldxl 


330 NEXT I 




wind 


fdb 















bec 


play2 


340 CLOSE 1 




uldxl 


fdb 















clr 


maskl 


350 END 




elncl 
eldxl 


fdb 
fdb 
















clr 
clr 


eincl 
eincl+1 


♦ ♦♦ 




ma ski 


feb 















inc 


exltf 
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winc2 


fdb 













play2 


ldd 


wldx2 






wldx2 


fdb 















addd winc2 


10 INPUT "ENTER eNVELOP 


einc2 


fdb 















std 


wldx2 


NAME",NS 




eidx2 


fdb 















ldd 


eidx2 


20 OPEN NEW NS+".TXT" 


AS 1 


mask2 


feb 















addd einc2 


30 DIM H{255) 




















std 


eidx2 


40 FOR 1-0 to 255 




winc3 


fdb 















bec 


play3 


50 W(I>- (255-1) /2 




widx3 


fdb 















clr 


masks 


60 NEXT I 




elnc3 


fdb 















clr 


elncJ 


70 FOR 1-126 TO 255 




eldx3 


fdb 















clr 


•inc2+l 


80 PRINT * FCC";INT<W(I)) 


mask3 


feb 















inc 


exltf 


90 PRINT 11," PCC";INT(W(I>> 






















100 NEXT I 




winc4 


fdb 













play3 


ldd 


wldx3 


110 PRINT NS; 




widx4 


fdb 















addd winc3 


120 PRINT 11, NS; 




einc4 


fdb 















std 


widx3 


130 FOR 1-0 to 127 




eldx4 


fdb 















ldd 


eidx3 


140 PRINT * fcc-;iwt<»(i)) 


mask4 


feb 















addd einc3 


150 PRINT 11," FCC";INT(W(I>> 


















std 


eldx3 


160 NEXT I 

170 ClOSE 1 




* l.a« 












*> 
*) 




bec 
clr 


play4 

rask3 


\ 

•( Play Note 


Subrout i 


no 


180 END 




*( 


(30S us loop) 




*) 




clr 


elnc3 


+++ 
















•i 




clr 


einc3+l 
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lnc exitf 

play4 ldd widx4 
addd winc4 
std wldx4 
ldd eldx4 
addd einc4 
std eidx4 
bcc play5 
clr masx4 
clr einc4 
clr elnc4+l 
inc exitf 

playS tst exitf 
Ibeq playl 
rts 

•( Initialize DAC Macro )< 

lnit macro 

clr DAC+1 
Ida fSFF 
sta DAC 
Ida IS04 
sta DAC+1 
endm 




clock macro 
CLK set II 

endm 



scale 
SMUL 

SMUL 

SMUL 
eel 

csll 

df(l 

d(l 

dsll 

eftl 

ell 

fll 

fall 

gftl 

gll 

gall 

afll 

all 

asll 

bftl 

btl 



macro 
set 1 
dup tl-1 
set SMUL*2 
endd 

set SMUL/CLK 
set SMIL*654 
set (cll+dll)/2 
set <cll+dll)/2 
set SMUL* 734 
set (dll+ell)/2 
set (dtlietl)/2 
set SMJL*824 
set SMUL*873 
set (fll+gll)/2 
set (fll+gll)/2 
set SMUL*979 
set (gil+atl)/2 
set (gll+atl)/2 
set SMUI.*1099 
set (ail+bll)/2 
set (ail+bll)/2 
set SMUL*1234 
endm 



* ( Octave Macro 

octave macro 

ifnc tl. 



scale tl 


*(- 


— 


-—•«-—— 


)* 


ifnc 12, 










scale 12 


vol 


ce 


macro 




ifnc 43, 






ldd 111 




scale 13 






addd 1128 




ifnc 14, 






std wpnt 




scale 14 






ldd 112 




ifnc IS, 






addd #128 




scale IS 






std epnt 




ifnc 16, 






eitdm 




scale 16 










ifnc 47, 








>* 


scale 17 
ifnc 18, 
scale 18 


M 


Notel Macro 


)* 

) * 










ifnc 1 9, 


notel 


macro 




scale l 9 






ldd Il2 




eitdif 






std winctl 




endlf 






ldd ITMPO*192/ (64*13) 


end If 






std eincll 




end if 






ldd IPRELD 




eiidif 






std widxll 




endif 






std eidxll 




endlf 






Ida ISFF 




endif 






sta masktl 




endif 






endm 




endm 











• { Tempo Macro ) ' 



tercpo 


macro 




lfc 11,1 


TMPO 


set 1 


PRELD 


set 64 




endif 




lfc 11,2 


TMPO 


set 2 


PRELD 


set 256 




eiidif 




ifc 11,3 


TMPO 


set 3 


PRELD 


set 448 




endif 




lfc 11,4 


TMPO 


set 4 


PRELD 


set 256 




endif 




ifc 11,5 


TMPO 


set 5 


PRELD 


set 256 




endlf 




lfc 11,6 


TMPO 


set 6 


PRE1D 


set 1024 




endif 




lfc 11,7 


TMPO 


set 7 


PRELD 


set 1024 




eitdif 




ifc 11,8 


TMPO 


set 8 


PRELD 


set 1024 




endif 




ifc 11,9 


TMPO 


set 9 


PRELD 


set 160D 




endif 




endm 


• (.._ 


I—. ...«....) • 


*( Voice Macro ) 



*( Mote Macro ) * 

note' macro 

ifnc tl, 

ifnc tl.nul 

notel 1,11,12 
endif 
ifnc 13, 

ifnc 13, mil 

notel 2,i3,i4 
endlf 
ifnc 15, 

ifnc t5,nul 

notel 3,t5,l6 
endif 
ifnc 17, 

ifnc 17, mil 

notel 4, 17, 18 
endif 
endif 
endlf 
endif 
lbsr play 
endif 
endm 



•[- 



■)* 



*( Rest Macro )* 

rest macro 

ldd »TMPO*192/ (64*11) 

std eincl 

ldd IPRELD 

std eidxl 

clr ma ski 

lbsr play 

endm 

•I Perform Macro )* 

perform macro 
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lbar *1 
endm 

• ( Return Macro ) • 

return macro 
rta 
endm 

•( Stop Program Macro 
•<- 

atop macro 

imp NKRMS 
endm 

.(. 



LISTING 14 



{— — 
( 

• 

( 

* 

( 

* 

( 
( 
( 

* 

( 
* 



Minuet In G 



by 



Johann Sebastian Bach 



lib music *** music macro file 
name 

lib ht *** harpsichord tone 
file name 

lib he *** harpsichord 
envelope file name 



• (.... . 

program 
)* 



Start of rauaic 



minuet init 

clock 1 
voice ht.he 
octave 2,3,4,5 
tempo 5 
perform parti 
perform parti 
perform part2 
perform part2 
atop 

*(- 

parti note d5, 1/4, e3, 1/2, g3, 1/ 
2,b3,l/2 

note g4, 1/8 



note a4, 1/6 

note b4,l/8,f3,l/4 

note c5,l/8 

note dS,l/8,g3,3/4 
rest 1/8 
note g4, 1/8 
rest 1/8 
note g4, 1/8 
rest 1/8 

note eS,l/4,a3,3/4 
note cS, 1/8 
note d5,l/8 
note eS.1/8 
note fs5,l/8 

note gS,l/8,g3,3/4 
rest 1/8 
note g4,l/8 
rest 1/8 
note g4,l/8 
rest 1/8 

note c5,l/4,f3,3/4 
note dS, 1/8 
note c5,l/8 
note b4,l/8 
note a4,l/8 

note b4,l/4.e3,3/4 
note c5,l/8 
note b4,l/8 
note a4,l/8 
note g4, 1/8 

note f4,l/4,b3,l/4 
note g4,l/8.g3,l/4 
note a4,l/8 
note b4,l/6,e3,l/4 
note g4,l/8 

note M,l/4,b3,l/4 
note a4,l/2,b2,l/8 
note nul,0,a3, 1/8 
note nul,0,g3,l/8 
note nul, 0, f3, 1/8 

note d3,l/4,g3,l/2 
note g4, 1/8 
note a4, 1/8 
note M,l/8,f3,l/4 
note cS,l/8 

note dS,l/8,e3,l/B 
rest 1/8 

note 94, 1/8, g3, 1/8 
rest 1/8 

note g4, 1/8, e3, 1/8 
rest 1/8 

note eS, 1/4, »3, 3/4 
note cS, 1/8 
note d5, 1/8 
note e5, 1/8 
note faS,l/8 

note gS,l/8,g3,l/4 
rest 1/8 

note g4,l/8,a3,l/8 
note nul,0,g3,l/8 
note g4,l/8,f3,l/8 



•)= 



note nul,0,e3,l/8 

note c5,l/4,f3,l/2 

note d5, 1/8 

note c5, 1/8 

note b4,l/8,ds3,l/4 

note a4,l/8 

note b4,l/4,e3,l/2 
note cS,l/8 
note b4,l/8 
note a4,l/8,g3,l/4 
note g4, 1/8 

note a4,l/4,a3,l/4 
note b4,l/8,b3,l/4 
note a4, 1/8 
note g4,l/6,b2,l/4 
note f4,l/8 

note g4,3/4,e3,l/2 
note nul,0,e2,l/4 



part2 note bS, 1/4, e3, 3/4 

note gS, 1/8 

note aS, 1/8 

note bS,l/8 

note gS, 1/8 

note aS,l/4,ds3,3/4 
note d5, 1/8 
note eS,l/8 
note fsS, 1/8 
note d5, 1/8 

note gS,l/4,c3,l/4 
note e5, 1/8, e3, 1/4 
note fs5,l/8 
note g5,l/8,c3,l/4 
note dS,l/8 

note cs5.1/4,f3,l/2 
note b4, 1/8 
note cs5. 1/8 
note a4,l/4,f2,l/4 

note a4,l/8,f3,3/4 
note b4,l/8 
note cs5, 1/8 
note d5, 1/8 
note e5, 1/8 
note fsS,l/e 

note gS,l/8,g3, 1/8 
rest 1/8 

note fa5,l/8,b3,l/8 
rest 1/8 

note e5,l/8,as3,l/8 
rest 1/8 

note fs5,l/8,b3, 1/8 

rest 1/8 

note a4,l/8,ds3,l/8 

rest 1/8 

note cs5,l/8,f3,l/8 

rest 1/8 

note dS,3/4,b3,l/4 
note nul, 0,b2, 1/4 
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note 


nul,0, a 3,l/4 




)• 






note 
reat 


bf4,l/8 
1/8 












• (•— 


, , i, ,, 


,, I, i ■ 


note 


bf4,i/e 






note 


d5,l/4,g3,l/4 










reat 


1/8 






note 


g4,l/B,b3,l/4 




lib 


BU>lC 


••• euslc macro file nans 










note 


f4, 1/8 




lib 


hi 


•■• harpalchord tone file 


note 


•4, 1/8, .3, 1/2 






note 


g4.1/4,g3,l/4 




name 






note 


cS.1/8 












lib 


he 


■■• harpsichord envelope 


note 


f4,l/8 






note 


e5,l/4,a3,l/4 




file 


nine 




reat 


1/8 






note 


g4,l/B,c4,l/4 










note 
reat 


f4,l/8,a2,l/4 
1/8 






note 


f4,l/B 














note 


g4,l/4,a3,l/4 




■( 
)• 




Start of music program 


note 
note 


•4,l/2,b2,3/4 
(4,114 






note 


d5.1/4.g3,l/4 














note 


c5,l/4,f3,l/4 




minuet Inlt 




note 


fS. 1/8,13,3*4 






note 


b4,l/4,e3,l/4 






voice ht,ha 
octave 2,3,4,5 


note 
note 


•5,1/8 
c5,l/8 






note 


a4,l/8,b3,l/2 






tenpo 5 


reat 


1/8 






note 


g4,l/B 










note 


cS,l/8 






note 


f4,l/8 






perform parti 


rast 


1/8 






note 


g4,i/8 






perform pjrtl 


note 


d5,l/8,g3,3/4 






note 


a4, 1/4 






note 
note 


cS,l/8,da3,3/4 
afS.1/8 


note 
note 


fS.1/8 
bf4,l/8 






note 


d4,l/e,b2,3/4 






note 


•4,1/8 


rest 


1/8 






note 


e4,l/B 






rest 


1/8 


note 


bf4,i/e 






note 


f4,l/B 






note 


•4,1/8 


rest 


1/8 






note 


g4.i/8 






rest 


1/8 










note 


•4,l/8,ds3, 1/4 










note 


•4, 1/8, (3,1/2 






note 


b4,l/B 






note 
note 
note 


bf4,l/8,a3,3/4 

dS,l/8 

g4,l/8 


note 
note 
rest 


c5,l/« 
f4,l/8 
1/8 






note 


c5,l/B,c3,l/8 






rest 


1/8 


note 


•4, 1/8, (2,1/4 






rest 


1/8 






note 


0,4,1/8 


rut 


1/8 






note 


b4,l/8,e3,l/8 






rest 


1/8 










rest 


1/8 










note 


•4, 1/2, d3, 1/4 






note 


•4,i/e,ds3,i/e 






note 


•4, 1/8, .3, 1/4 


note 


nul,0, «2,l/4 






reat 


1/8 






note 
note 


ei.ua 
fs4,l/8,b3,l/8 


note 


f4,l/4,d2,l/4 






note 


b4,l/8,e3,l/4 






reat 

note 


1/8 
fa4,l/8,b2, 1/8 


•top 








note 


d5,l/B 






rest 


1/8 










note 


g4,l/e,g2,l/B 






' 








reat 


1/8 






note 


f(4, 1/2,(3,1/4 parti note 


f5, 1/8,43, 1/2 






note 


f4, 1/8, b2, 1/8 






note 


nul,0,b2,l/4 


note 


•5,1/8 






rest 


1/8 






note 


g4,l/4,e2,l/4 


note 
rut 


cS.1/8 
1/8 






note 


e3,l/8,b4,3/4,d4 


3/ 




note 


bf4,l/8,c3,3/4 


note 


cS,l/8, f3,l/4 




4 


g4,l/2 

rest 








note 


dS,l/8 


rest 


1/8 






1/8 






note 


94,1/8 


















rest 


1/8 


note 


dS, 1/8, g3, 1/2 






note 


b2,l/8 
1/8 






note 


94,1/8 


note 


fl.1/8 






rest 






rest 


1/8 


note 


bf4,l/8 






note 


e2, 1/8 










rest 


1/8 






rest 


1/8 






note 
note 


a4,l/8,d3,3/4 
cS,l/8 


note 
rest 


bf4,l/8,g3,l/4 
1/8 






return 






note 


t4,l/B 


















rest 


1/8 


note 


•4,1/8, «3,l/2 




• 








* 


note 
rest 


14,1/8 
1/8 


note 
note 


cS,l/8 
f4,l/8 
























rest 


1/8 






end minuet 






note 


g4,l/8,g3,l/4 


note 


•4,1/8,(2,1/4 














note 


bf4,l/8 


rest 


1/8 




+++ 








note 


•4,1/8,(3,1/8 


















rest 


1/8 


note 


e4,l/2,d3,l/4 














note 


a4, 1/8, a2, 1/8 


note 


nul, 0,(2, 1/4 






LISTING «S 






rest 


1/8 


note 


f4,l/4,d2,l/4 














note 
note 
note 


•4,1/2,03,1/4 

mll,0,a2,l/4 

f4,l/4,d2,l/4 


note 


C4, 1/8, (2, 3/4 

(4,1/8 

94,1/8 














note 
note 


















rest 


1/8 








Minuet In F 






note 
note 
note 
reat 


f5,l/8,f3,3/4 

•5,1/8 

cS,l/8 

1/8 


note 
rest 

note 


g4,i/e 

1/8 

C4, 1/8,12,3/4 








by 






note 
rest 

note 


cS,l/8 
1/8 

dS, 1/8,93,3/4 


note 
note 
rest 

note 


f4,l/8 
• 4,1/8 
1/8 
•4,1/8 








Wolfgang iMdiui noiait 




note 


f 5,1/8 


reat 


1/8 
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not* c4,l/B,a2,l/4 

nota g4,l/8 

not* b(4,l/8,c3, 1/8 

rait 1/B 

nota i4,l/e,d3,l/B 

reat 1/8 

nota (4,1/2,(3,1/4 
nota nul,0,(3, 1/4 
nota ^4, 1/4, «2,l/4 

raturn 



and alnuaC 
LISTING #6 



Mlnuat In Minor 



Johann Sabaatian Bach 



*( — 

lib 
lib 

name 
lib 

flla 



mualc * aB aualc nacro flla nana 
he •■■ harpilchord tona (11a 



ha 



'(— — 
■( 



*•• harpalcnord anvalopa 

) ■ 

Start of aualc program 



•<- 



minuet In It 

clock 1 
volca ht,ha 
octava 1,2,3,4,5 
tasr>o 5 



nota 14, 1/4,(2,1/2 

nota (5,1/8 
nota (5,1/8 
nota dS,l/B,c3, 1/4 
nota c(5,l/8 

nota dS,l/4,d3,l/2 

nota 14,1/4 

nota bf4,l/4,a3,l/4 

nota ca4, 1/6,(3,1/2 

nota i4,l/e 

nota g4, 1/B 

nota bf4,l/B 

nota 14,1/8,12,1/4 

nota g4, 1/B 

nota (4,1/4,12,1/4 
nota a4,l/B, (2,1/4 
nota f4,l/B 
nota d4,l/4,b2, 1/4 

nota f4,l/4,b2,l/2 
nota bf4, 1/B 
nota 14,1/6 
nota d5,l/B,g(2,l/4 
nota c5,l/8 



nota (5, 1/4, f2, 1/2 
nota i5,l/6 
nota d5,l/6 
nota c5,l/B,c3,l/4 
nota bf4,l/B 

nota a4,l/6,d3,l/4 

nota bf4,l/16 

nota c5,l/16 

nota (4,1/8, f2,l/B 

rest 1/B 

nota a4, 1/B,a2,l/B 

reat 1/B 

nota d2, 1/4,(4,3/4 

nota d3, 1/B 
nota c3,l/B 
nota 62, 1/B 
nota ii2,l/B 

nota 14, 1/4, b2, 1/2 

nota (5,1/8 
nota e5, 1/B 
nota d5,l/8,c3,l/4 
nota caS,l/B 

nota d5, 1/4, as, 1/2 

nota 14,1/4 

nota b(4,l/4,a3,l/4 

nota Cl4,l/B, (3,1/2 

nota «4,1/B 

nota g4, 1/8 

nota b(4,l/8 

nota 14,1/8,(2,1/4 

nota g4, 1/8 

nota (4, 1/4, b2, 1/4 
nota a4, 1/8,(2, 1/4 
nota (4,1/8 
nota d4,l/4,b2,l/4 

nota (4, 1/4, b2, 1/4 
nota b(4, 1/8,12,1/4 
nota 14,1/8 
nota d5,l/B,g(2,l/4 
nota cS, 1/B 

nota (5,1/4,(2,1/2 
nota (5, 1/8 
nota d5,l/B 
nota c5,l/8,c3,l/4 
nota b(4,l/8 

nota 14,1/8,(13,1/4 

nota b(4,l/16 

nota c5,l/16 

nota (4,1/8,(2,1/8 

raat 1/8 

nota a4, 1/8,12,1/8 

reat 1/8 

nota (13,1/4,(4,3/4 
note 12,1/4 
nota 42, 1/4 

perform part2 
perform part2 

atop 



part2 perform part) 



note b2,l/4,d5,3/4 
note bl,l/B 
note (2,1/8 
note b2,l/B 
note c3,l/B 

per(om pert3 

note b2,l/4,d5,3/4 
note (2,1/4 
note bl,l/4 



parts note i5, 1/8, d3, 1/B 
reat 1/8 

nota (4,1/8,(3,1/4 
note i5,l/8 
nota gS,l/B,g3,l/4 
note (5,1/8 

note 15,1/16,13,3/8 

nota (5,1/16 

note gS,l/8 

note c5,l/2 

note nul,0,e3,l/6 

note nul,0,c3,l/6 

note nul,0,a2,l/B 

nota (5, 1/8, b2, 1/B 
reat 1/B 

nota d4,l/B,i2,l/4 
nota (5,1/8 
note i5,l/B,<j2,l/4 
note d5,l/8 

note ci5,l/16,(2,l/8 

note d5,l/16 

note (5, 1/8, g2, 1/B 

note n2, 1/8,14,1/2 

note b2,l/8 

note c3,l/8 

note d3,l/8 

note 14,1/8,(3,1/4 

note b4,l/8 

note ci5,l/8,c3,l/4 

note d5,l/B 

note eS, 1/8, n2,l/4 

note (5,1/8 

note g5, 1/B, (2,1/4 

note a5, 1/8 

note ciS,l/B,f3,l/4 

note bf5,l/8 

note *5, 1/8, 113,1/4 

note g5,l/8 

note (5,l/16,b3,l/4 

note (5,1/16 

note dS,l/8 

note (5,1/8,(3,1/8 

reat 1/8 

nota c(5, 1/8, (3,1/8 

reat 1/8 






oid minuet 






FOR THOSE WH 
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MOTOROLA INC. 

Mi-croproc««aor PrOchJclsi Group 
*$0t William Cannon 0n«« *•*» 
Austin tklH 7B73V65M 



EDpPftlAl CONTACT 

Alan Kelly 

Cunningham Commu ntcaiton. lac. 

2350 Miuicsn College Boulevard 

Smtt 900 

SaftMOttrt.CA «0S4 

<a08l982-O40O 



READER CONTACT 
Dean Mm Icy 
(3121 **0 2839 

INQUIRY RESPONSE. 
Technjtat Infomumm Center 
TO Bo* 32073 
Phoemx, AZ 830?: 



MOTOROLA ANNOUNCES DEVELOPMENT OF 23 MIU6S0J0 
Spmpltri to Bcfm December |V8? 

NEW YORK.Ocv 29. ]9S7^lnurtdcmwiihi>iej))iPpin6 0fitjnewci.t 32-btt 
mci^toishic , ihc 69030 (030) 31 20 MHi speed. Motorola toby annotsnced ihe 
development of afasur 25 MHi version . scheduled for tampilnjin Ctcnnlx r IMS7 

TV 0JI) (nkknimr*) **oh thirty "lean provide Twice the perforrfunce of MokkoU's 
feoXCO.ihe mo»i widely used 32-bii chip in the world. Iu*dv«ACcd features include on-«;hip 
uutrucuon and data caches, on *chip nxmwy mini semen land parallel svhrrenure typical of 
main frame ocenjiuien,, 

TV speed of It «*c»ojroctl Vjr ti a n »eaiw*enot only of ho * quickjy i chrp car pcrtorrn 
i* operanon, « it also a measure of ihc efficiency by which a chip ttrrnnufxtufd For 
nampJc. M c*o rub 's 64030 was initially manufactured at tpeeds of 12.3 and I IS MX/„ hut it* 
ihc martufscfunnjprucratiuiutd ihr »20 wis able*oic»ch clock spccJj of 20 j.nd 25 Villi. 
"The longer a Chip line L* njunufanurtsL the faster it Rett." said Dr Murray A GoU^ji 
senior vice president and re/icra) muaeer of the M«tmrosT*st» Producti GmtiP, (Austin. 
TaosJ. "All 68000 chip* undergo a samibj manufacturing. PTOTUbCCalfte the 68UO ramtly 
it based on a completely compatible awru" lecture- WVthcr we're making 68000% or 68030*. 
wciuc(Jk some fabrication praxis. With the maturity of (he nghi year-old 64(000 line we'll 
produce 030s at speeds our curriieurion. can't touch. TV Intel 80356, for example. Is just now 
heginjuca, id shipai20MHr_ What's more the 38f> isa first-gmeroiioc product thai is 
<*>*rvur»bCc B Motorola's previous -gercinc*! €8020, Wi* (heuinodociwQ of ihc 030 at 2> 
MHz. Motorola a Iwo big step & ahead'* 

Acasrdn ( ia Mnnb. die 030 will be available at speeds above 23 MHi later in 1988. 
Morjrcb'iS? billion Scnicvnd ucrjr Ptuftjui Sector (Phocni*. A nr.]. which includes 
ihc M cxvproc cssor Pruiuus Grow p (Austin. Te*a»). cs a division of Momrous Inc. It i> ihc 
Largest andbradnl (emJEAvSvcmappllcrin North Amenca wiih a balanced product 
ponfouo of over 30.000 devices, 

MOTOROLA ANNOUNCES 68030 EMULATOR MODULE 
Emulator Will Speed 030- Based Pioducia to Market 

NEW YORK. Oct. 29. 198?— Motorola loctoy tanoiuad the avattablhiy of an emulator 
for the 68030 (0301 mjcwpmctuar. Thr arw 030 touii»*« module provides system design 
support that * iH lpeed 30- based hardware and software products to market, 

1he030(juct^iamed"ob dijrty~>. also unvtilrd today in New York, is the newest 
fremiti of the 32-bic 68000 f arm iy and is fully eompaiLWe wiiri iu prtdeceivorL ihc 68000. 
680 10 and 68020. Phivwunj ihe 030 emulator ai ihe same OPK ihac the chip is delivered nukes 
eaiiydeveltipciienrof 03O.based pradsco powiWe for lyitcir desieaer» ufaJl liies. 




By: All of us 

'CmtribiM tytkutg - Tjpect iXptlwg ', DMW '86 



Mknfnicwiircrnuiadcetti hey n> succeulul product devefofv^mt. Emulators allow 
prod uci designers to test Ihcir hardware and sofrwarc wiinout buiHine tenure prototypoajt 
well it (callow multiple enRiocers to work ondeveu^meni pra)etu All of the*? (Mian mit 
crucial to tpecdir ■; predudi lomanut. 

The cmyla*™- module often ihe same func&ctubiy as ihe 030 while g.vv>KCOinpuirrdeMtfn 
er)|tr«en important inrtvrro orxi on how w oprnrue 0)0- bated tys,cm po^orma rtcc and dcMfn 
fiK IMUrVC. the module can run time trials or bene hma/ts Of a trjcofied ta/ict atiplirabon in 
TTluIt)p1ee0rJi8ur«ck>va This eli/ru/iuei the need to build and lesi prototype syiiems to mike 
design ffaukniTdecMioris, After dOCTTntning the best design approach fori spttt HP application. 
dengncTS can use vNc030cmvV»( OT foraddiuofia) hanjware and jofrware dcveiopraent and ic«nng 

"The 030 crnoiaiDT w»U hc*p brinf hardware and software prodixis to mtekct qwcUy. 
and we aie happy toa/wouncc ii atthc Same rime the 68030 oeeernei avaiiahlc," uid Dr 
M umry A. Cddman. scni or v>ce preaictent and gcneraJ manaeer of Motor!* "* 
Microprocei see Products Croup Ausim. TeiasV * We provide the world wiih not only the 
hijhfsi pcrTormarce chips, bul also with looli that aJlow ihetr power so be maaimued.** 

The 030 crnul*** u pan of ihe HDS-300 Kardware/Soliware Ocvetuprncni Suiion from 
Morula that UolTeredfwaBm*rro(rTT«*«a^ (n ihe 68000 (airtily TIk HDS-300 is a 
hcrtt-i«)q>cndcn i interface thaiao^o^ffurnoircorr^uirf^ so i^OJOcflUii*** module This 
aliowt mula pie eo^irjeen u u>e die esntilaiorcOAnarM tly. funhcr accelerating producis to 
market. 

Key Fmmre* 

Techiucal Features of the new emu Later include the foilawina. 

i Zero wait u»te emulation for tareetoxmory #i 23 Milt 

' Zero wiii'woit rjiMUdon for internal eoaulioor) memory « 20 MHi and a muumum 
Of one wailstale al 23 Mhi. 

■ Synehronoui tifjuJ gcncradonthainuiybe used locvlimiiepaforrrance of urgci 
synchronous bus liming 

• Thtee hardware teeakpOMai that can ha£t emwlatson before citoeution of any 
ln»truct<ort tocaECdl anywhere in memory. jhcludinB; \AsVwlXons located in ROM 

■ Simy four sociware breakpotras for program enecvlion COfUro* and dcbuta>n» 
a Suppon of C30 syoehnmous and bun* acens mcoiory 

■ Eemil tckM meirswy of 64 K bytes, with options for 236K bytcsdnd IM byte 

■ Tract; capibsbry is provided by the optimal Sy»cm rVrformance Analyier. which 
capcuro qualifkd events in a nee buffer thai il 160 bill wide and 4096 evertai deep. 

- tjnulaoaei tremwy thltcan be mapped on any 4K b>ic idUnm m blocks as small a* 
4K byia. Memory can also be trapped in ucremEn is of 8-, 16- or 32-bii w\Je 
uyac hrcewM s aremevy with to 7 wait suns, or 32 bit wide lyi^iircrioui menvry 

Orders arc now being accepted for delivery oTthc 0X1 (in«lflior module Price ranges 
from»9.dOG to SI4.900, deT»n(iU>goo the amount of tmulioort oxroory purchased wiih ihe 
module. The KDS.300 t» available for J7J00. 

Motorola's S2bUl1oft Scrnicetnductor Products Sector (phoenix. Ariel, which includes 
the Mkau|rianaisT PnatartsOroupfAustin.Tntixl.iiadiv^i.ion of Motorola Jne: Itiithe 
udxcx aod bnadtaisuvpJierof *emkrj«l ocmtj in Nort h Amaxa. with a balanced prtalun 
portfolio of over 30,000 clcvicn. 
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Tandy Corporation /Radio Shack 



IKME[j]ATt HULI-ASr. 

rran Hcoah** 

Mark* ting Inf orui Ion 

417-390-3487 

RADIO SMACK XXLCA9I3 03-9 DIvILOPHIHT SYSTtM 30»T«ARI 
POR COLOR COMPUTER 3 

Radio Shack*. ■ dlvlalon or Tandy Corporation and Mjor 
rtlllltr Qt conputtr mnA tJictranic product!, has rilmid the 
OB-*' D*v*iep»rit IffHH for ih* Caiot Co«put«r 3" 

Th* 05-fl DauajopaaiK 5y*t*a |a a coipltti ad: lor ■ aaat-ati,er 
with *ul)-«cr«tn •diliftfl and ipacialty I/O driven. The 

day* jopaant ayatai givn varlou* «« wall «.* 11-jvjl* Color conputer 
prdqriifl^n t 5 n]i iu dwalop aufwar* progriii for their own 
cunoiiitd Appl Italian* - 

Tna ris ■■< i.*v»j Two optratir,?/ *y*t*a teat- Ko. Jt-WJiy 1* 
nqulrtd Co lak* *dw*rn*U* of prOflr*p»ing tool* providaH by tha 
dvup^opovnt ayatan. 

Avijiablt through iori than 7.000 Radio Shack 3toraa. HaiJlo 

ShacJc Coaputar C«nt«ra« and participating d*al*ra nations-Ida. tn* 

auggaatcd ratal 1 price or tha Q8-* Oavalopaant Bystft (Cat. HO. 

36-30321 la 699,9% 

- 30 - 

Radio Shack and Radio Shack, Coaputar Camera in ragtatarad 

aarvlcc aarka or Tandy corporation. 
Color coaputar 3 la a tridcurk of Tandy corporation, 
0S-» 1* a trademark or Mlcrowara SVataoa Corporation. 



kB/WINDRUSH 



Mcro SyMon-e, LB 



.V' '■■*£ '_J0OiaiOr.es **& *)t' «N 

NC'rt Aj^m \0'lOt SPSS 9S-* 

t«, 're?2' 40aC6b 

r-it-. 9755<i§ WVtlCROG 

MAPC On approved caisultanis 



WINDRUSH HARDWARE a. SOFTWARE RESCUE SERVICE 



Windrush Micro Systems Limited announces the immediate availability of 
access 10 a team ot Motorola MC6809. MC68000 and MC68020 design 
specialists. 

Design engineers are now lacing lormidrbto teaming curves in the design 
and programming ot systems using Vie latest generation ot 16-bit and 
32-bit microprocessors This olten results in projects taking two to three 
times the original project estimates 

Windrush oiler a lull range of services ranging Irom project start-up 
assistance to complate design, prototyping, programming and 
manufacture. 

Windrush have specialised in the Motorola and Hitachi 68XXx family since 
the introduction ot the MC8800 in 1975. The company has not diluted its 
expertise by involvement wttn the Intel. Rockwell or Zilog {et al> families ol 
processors Our expertise ranges Irom the application ot single chip 
micros, eg 680 1 , 6803, 680S and 681 1 to the latest generation ol 33 bit 
processors , eg 68020 and 68030. 

The company also specialises in the application ol microprocessors in 
microprocsssor development systems using FLEX and OS-9/68k. 
process/machine tool control systems and data logging equipment. 

We Mtwiyi offer fixed eost quotes. There are rwwr any hidden costs. 
You knew, (n edvanc* exactly how much die project is going to cosl, right 
down to the last penny. 

Before you stall an in-house protect why not give us a call ... you may tind 
that we can do the job more economically and in a more timely manner 
Important factors K you want to beat your compel lion 

For further information contact Bill Dickinson on (0692) 404086 



GESPAC Inc. 
30 West Hoover Ave. 
Mes*. Arizona 85202 
Tel. (C02) 962-5559 
Fax. (802)962-5750 



Reader Contact: Mark Stephens 
Editorial Contact: Cosmo PaMuclsMts 



FOR IMMEDIATE RELEASE 

GESPAC XNTXODUCES 2 MEGABYTE ORAM DOAKO t"OP, G-64 SOS 

HE-A, AI, HOVSHBW 2S, 1987 — GrSpAC intiodtic.l • 2 aegebyte 
Oynuic WW board built on * single baight Eurocerd and 
compatible with tha standard G-64 bua. 

Tha GESRAM-14A la oty.r.iz-i aa 1 Hwj of 16-bit norm, with 
on-boaid parity cheeking to protact against aystt-a failures. 
Tha GSSKAM-14A U3I3 aayncbronoua timing and providea an 
access ti«a of 2.0 A3 autlaua. 

Tha board faaturaa a vary bigh laval of integration, uaing 
SIP packagee and aurfaca mounted ZC'a. Tha GXSRAM-14A .ill 
work with all SBOOO, 6B020 and B02B6 procaaaor boards 
producad by CISPAC. 

Tba board ia available today and is piled at a low unit 
prlca of J995 

Industrial Keyboard Display 
Interface for tbe 0-6. bus 

Hesa, AS, Novaaber 6. 19B7--GESPAC haa introduced a 
-ereetile keyhoe rd/dieplsy intarface board for the 
G-64 bue. The GESIKD-2 ia specifically designed to 
attach to a variety of compact keyboard/diaplay 
assemblies to provide cost effective bumen interfece 
in eiachine control and instrumentation applications. 
Tbe GESXIU>-2 allows tbe ayataei Integrator to connect a 
atandard or cuaton keypad/keyboard of up to 90 key. 
plue the ehift and control keya . The board 'a output ia 
deeigned to drive todey'a Boat popular text or 
grepblca Liquid Cryatel Diepley (LCD) or Vacuus 
fluorescent Qi.pl.y (VrD). Asong the displsy units 
supported ere tboee manuf actured by Hitachi, Philip., 
Epson, and put aha 

The GES1KD-2 bes sn on-hosrd DC/DC converter with en 
adjuatable output of -5 to -22 Volte that providee the 
neceaaary negative voltage (VTE) for LCD diaplaya . The 
board eleo coaiaa witb an optional DC to AC converter 
to drive electro lvjeinascent (EX,) lanp for bee-lit LCD 
di aplay a . 

The GBS1KS-2 la designed on e etenderd single belght 
xurocerd end cen operete with eny B. 16 or 32-bit 
■ iccoproceeeor on the G-64 bua. Tha G-64 bue ie e 
eecond generetion 16-bit bue elated at nldrang- 
Industrial applications. 

Tba GESIKD-2 is available today at tha beeic unit 
price of S39S. 
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First 66030 Single Board Computer 
Offers 16.7 and 30MHi Zero Wait State Operation 
For Performance Sensitive Real-Time Application! 

Moil Powerful 33-bit MUropro ccnor 
Diivts Multiproctiting VMS/PLUS" Board 



tf 



Fart* Computcn Greiprt, 
DabnlwrttrasH 9, 0-9C12 
Otutbrunn, Wri-i Germany 



Contact: 

ForCc USA Wavne Fischer f40«) 3M-3410 

Fore* CmbH Anion Nattch (069) 600 910 



LOS GATOS, CA. t Narveaaber 17, I9»? — Thr lull working 66030 iin^ board 
computet lot ihe VMEbti*. and pelhapi the fint ofllh* ihetf o^OMbtscd piodwi to 
reach the worldwide maritetplace was announced today by Force Compurc rs. 

"We demonstrated • working producriun model of th* new CPU-32 board five we eb 
•go at Sytttm 87 in Munich," said Martin Wcbbetg. Fcrct SJtenitiw Vice Pnrsidcnr . The 
CPU 32 provWM 32-btt VMEbus and VME Subsystem Bui fVSBi inrerfatcs while achieving 
zero wail naif performance in ■ single card cage flat. Using in advanced gate array and 
dense surface mourn technology, chr CPU-32 combines the computational logic of (h/c* 
boards into one. The 68030 imparts processing powa thti takes the CPU-32 beyond any 
known tingle board computer. Ine microprocessor itself includes an on-chip paged 
memoiy management unit (PMMU) capable of demand-paged control of up ic 4 gigabytes 
of virtual memory. The board includes a 68882 floating point coprocessor. 

The CPU-32 design is bated on the recently announced VME/PLUS eivhiiecrgre for 
high-end real-time applications Supporting the 68030 is I Mbyte of 1 00ns static RAM 
Versions rated for operoiion al lb.7 and 20MHi are beiitg prepated for shipment during 
ihr first quarter of 19B6, pending microprocrtjoi availability, "if oui microprocessor 
vendor delivers, we will deliver sfid Wayne Fischer. Director of Marketing. 

All veurotu of ihe CPU-32 ate equipped with VMEPP.OM. ihe irtenrly announced 
POOS*" real lime operaiutg system kernel phis FORCEbug'* moniror debugger software, 
at no additional r harjte 

The CPU-32 U one of the first VMEbvii products to ship with a gate an ay solution to 
VMEbu* interface and romrol A 133-pin CMOS gate array replaces down* of integrated 
circuits. "As a VMeVPLUS product, ihr CPU-32 U uiirnded for realtime applications where 
Ihe memoty manafemtnl capabilities of Ihe 68030 proreifor are needed in combination 
with uairom promising performance said Weisberg, The 8*1' array solution helps reduce 
board count from '}< to 1. while ihe lemarkable 68030 microproceuor gives our customers 
unprecedented power 

CiiSfomen using Fane CPU 2) And CPU 2b CPUs can employ the CPU 32 with full 
compatibility yet much higher performance The new board provides a direct software 
upgrade path ihat requires no changes ro a pplir»uon programs. 

Fcarurfa Go Beyond Staff* Board F*r*ctatiuns 

The 68030 microprocessor is apptoiJmaiety cwice as powerful as its predecessor the 
68020. It impam the following capabilities to thr CPU-32; 

• nuiJMn paged mtmtrrj ma*Q?™t#m untt (PMhlV) feued on the 6MS1; 

• 236 6yfr data cache In addition to Instruction cacflfoj fitr imprwvti data 
/h>w; 

• Op to a 200% (•vnrrrmis- in cxreuiion speed* «/ the uurruccten eel; 

• PfpeftAcd CfV avchUrcturr mprrdi intejraird mrmarj management; 

• Burtt data and instruction retrieval (id byrer. rather than * *y*et) boo*t$ 

through** x. 

The CPU-32's a ilic RAM space will permit 4Mb)ri« when higher density devices 
become available. Devices with access rimes of lOOru allow signifcani cost wving*. For 
highest peiformance. SRAMs with 3Sn> access time aie being cowpled with the 30MHi 
versions lo provide constant zero wait irate access. The 20 and 25MHe venioru provide 
constant I wah stale accass. 

The CPU-32 also offers two serial ports based on the 68S6I multiprotocol 
communication* ronttoltet. two parallel tniriface/nnvis based on ihe 68230. rwo bus 
interrupter modules (for CPU interrupts) based on ihe 68153. and a real-time- clock. 

rCAOOl Cote Array Function* 

A proprietary Force design, the FCA00I it a 132 pin CMOS gate array wilh I.S 
rtucron fearuresiK.lhearray coruumci less than 120 rnlDtwarts, featutes remarkably tow 
gatr delays (1.4 ns) imd is capable of an iftif rnal toggle frequency of 200 Mhr. and 
etrmut toggle frequrncy of 70 MHZ. 

VMEbus inieifare and control funciiohs include PSACK generation, bus ertor 
genpralion. *yiiem tesrt. bus clock and «tl on-board control logic. 

Operating. $yt€tn Kernel fa Included 

The CPU 32 u Force Computer's fourth CPU lo include VMEpROM. Thu real-lime 
kernel enables immediate hoofing and comprehensive opeialian ihe moment the board is 
installed in a system environment- VMEPROM Is fully coraparfblc with and contains a rich 
subset of capabiiiiiE* from PDOS. a popular real-time sysicm employed with more than SO 
CPU boards from nearly rwo dozen vendorv Thr kernel includes a POOS file manager and 
BIOS modules. Abo included is RAM disk support, a screen editoi, disk formatting utilities 
and a rich user interface providing over 7*> command! for debugging, kernel and file 
manager control. 

Force plans to pot: other operating lystrms and kernels 10 ihe CPU-32. lTiese will 
be announced as ihey are made available 
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A NEW 8K I 6 CMOS STATIC RANDOM ACCESS 
MEMORY. THE HCM606*. IS NOW AVAILABLE FROM MOTOROLA 



Ausltn, Taxia. Novambar it. 1887 Th» n o i roia Mamory 

Products Olvlaion la olfarlng threa apaad varS j 0na | t na 
MCM6084, lOOna, I20na AND iSOna. Tn|a davltr* la 

configured aa 8K word a of 8 blta aaeh and lo accommodala a 
varjfiy ol appllcallona. it la avallabla In both atandard arsd 
low power varafona. 

*K*va lo it. populftciiy. tha MCMSOw 13 pin oomp.,, b i v W(lh !h# 2764 EPR0M |amf|y 
Whila ooeral.no , r . miry sialic mod*, no ctock.ng la r Bqu .r M tw (6V and E2|. ir w ch,p 
enable pins. 10 function property. Bacrjusa there are twin active n.gh , n rj active low 
enable pins on lh. 5 memon/. ,„» ft.,ir>,tliy n, rad w lhe d88igner ls 9 ligniflcai1t 
consideration. 

Th. k» pow.r 5 „„« y mod . B .nl.,.d »u1o m ,ti«ly wf,en.«« «th., ol In.s. .„,*„ 
is unuttnvO. Th. mrmal moo. ol op.rtief, , ,„ ummta wh , n &* .naoi.s ,elu,n » 
choir tiu. .is.neo stats 

Whit, in lhe low power it.ncrby mod*. Ih. MCM6064 isqulra. onty 100 miciolmperas 
maiimum and at iiule as 3 microamoarat under typical opaiallng cohdilirjns. To suppori 
low power and balte/y hacked up appl£aito"i. ihe MCM601G4 versloo Is available 
optionally. II requires only 1 mleroainpare muimum and 6 rflietoimperes lypicaffy 
when ihe standby mooo is actrve 



Tha CMOS siscon.gn. lachnoiogy allows Ml operation whenever ihe axiirna) power 
sou.ee rs sat io *$ volts •/* 10%. A .2,o volt to .5.5 von range will Insure dais 
retention. TTL compatibly rdr all Inputs and oulpuis is guaranteed ihfougnoui. 
Additionally, ihe outputs can assume a threa siaia condition 

To ofdar either or ihe.se memory devices, ih. 500 p«ce prate is listed below 



MCM60MP10 
MCM6064P12 
MCM6064P1J 
MCM60L61PI0 
MCM60L«P12 
MCM60164PI5 



J«03 
3,70 
3.3£ 
4.64 
IS 
386 



MOTOROLA ANNOUNCES A NEW kSMHCn 
DEVICE. THE MCCIMCtlEa 



Auatin. Teias. November 13. 1947 Th. Motorola Microcontroller 

Olvlalon la plaaaetf lo announce tha arrival of lhe MCUHCtlCa. Thla 
HCMOS alngla-chlp microcontroller will contain a full complement of lhe 
existing features of In. MCMHC11A6 varalon. To euppoll more 

nvemory Intenae appllcallona. II cornea equipped with 13K Byte, of ROM, 
512 Bylaa of HAM and 913 Bylae ol EEPROM. OapancJIng on Ihe apaclltc 
need, there are either 3/9 or 4'4 Input ceptura/oulpuf comp.r. timer 
optlone avertable. An added aecurfty laatura la an EEPH0M block which 
proteclo the CCPROM from eccldentel araeure. AddhlonaKy, ihe 
(PJHC11E9 taaturea an 6 channel A/0 converter and a COP watchdog 

The MC6SHCl1Et will b* available In a 52-pin PLCC Tha guaraniaad operating 
lamperalura range is trom <0Bd5 degnes C. 

There is a 6530000 mask charge lor this osvtce. ROM patterns era being accepted m 
Oacemeer 1967 wiin sampling scheduled for iOM A ROMess varalon. the MC66HCIt. 
wa also b* available iOtj» for prototype purposes Ful scela produdion ol iht E9 will 
oceur during 308H in ism. itra El and E» 1. 000 unfl pricing is 122.0a and SZ2 6S 
raspeorvaly Tha M69HCI1EVU wit provide deveiopmeni support (tSOO.OO) 
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MOTOROLA AflMOtmCES A NEW HMHC09 MCU 
CORE MEMBEA WITH EEPROM. TWE 
MCMKCOSB BERIEB 



Austin, Tint, Ngvimbtr 13. 1017 Motorola'* Microcontroller 

Division mnovncil tha HCM05 MCB8HCQ5B eerie*, a now high* 
performance M68HC0S Microcomputer (MCUJ Family mam bar Thia 

aar !aa Eniegrelie a variety of verse tile functiona including EEPROM. on 
A/0 converter, and flailbla Wmm. Thia MCU sariee la offered ir> 
althar a 52*l0*d PtCC Or 4*. pin DIP. 

tmtial membeo ot tha MHC0S8 r*mHy include the Mowing mernary eonftguraions 

UCeoMOWO* - 4K ROM AND 176 BVTES OF RAM 

MCS8HC0S9Q ■ CK ROM. 256 BTTES Of EGPRQM AND 176 BYTES Of AAA* 

MC«BMCAQ5BB-«K EEPROM AM> 176 BYT£S Of RAM 

Tha aarloi core is thai of tha wtU known MMMCC8. Tha instruction sal mcudst 
powerful 8 « 8 muii^ry. on t*i. bit clear. togtcaj and erlihmetle operations An a- 
cnannrt A/0 convener tg prov«3ed usino ihe euxMii«4 approumeuon technique w4t> 
tun captaiive cnarge redtavftjuUpn method results in inherently monolonic and ecourets 
6 b«T conversions, To cave power, the A/O convene* emptftief power supply cen m 
swooned off under software eonlrot 

Tha MCUHCOte* COntaJni 6K o» ROM, «**<*** ir* MCftOHCOSO* hot *K bytes of ROM 
A 6X E£pROM (MC68HC805B6) emulator pan ml be ava&aAle in 2Q66 and tt a pin let 
P*0 ceotiotmoni for the ROM vetvont. Th# WHCB05B6 Is ttoai tor low QVaVWly trial 
and coda> tjuaJMcattan pftasM. Ail HC05B davtcwa contain an onboard sail lest program 
usiiu* for customer irKomeig tifCOUsv* and caflatna routine*. Al deMccs tn The tanas 
conieln 176 byies of RAM. 

A I6<bil fraa ronnaiP timer Is provided with 2 BDOCtaled 1 6-Wl compare and two 18- 

tj.i eeptura raoititn. individual mtemuOJ vectors a/a provided ■or timer capture ano 

compare rundiona. Th# timer unit aiso nai a two channel poiie width rnodutallon 
auftflfaiem. 

There or* 2a UUm. P vt iaj uo pons and 6 Input oniy pon*. Memnr> nujppsd CPU access 
or thesa pens stow individual bti minlpuliiien and brandHM -ataiui feeluroe. There 
are 7 interTVpts. c hevdwant. and one softww*. Ont of tha hardware tftiemjpis * 
talarnafc 

The MC68HC0566 he* 246 bytes ol byle erasabia EEPROM wltn an on board cnerge 
pump that generaiee the MoA vertigo nocesajry tor proQrammirto and *r«fting Typicel 
arKJurance Is 10.900 cydat. 

TM SarieJ Co mmunic* ikins Intarlaoa ISCH ts s very versaiile. tuty *nO§p*nOvf», Oh 
direciwnai. eiyncfiroftoL-s fecetva/lranemii unii provloVng a s-irnple but powarlul 
lUVhiav* setUs! Unit. Noisa chaciaiy overun, end iram* error information It provkMd to 
trie CPIi. 

Tn*« *s a progranirhing ewtder ihai asowi redveuon oi ma internal operating irecjuencv 
by a item or 16. wttldi In turn raiuiti in a similar reduction ol irte power dlis>pi|<on 
Two addlilonn power uyincj mooes are stop and warn These are aorrwara coniroliawe 
modes. A weichdog lealtite provides a syiiem reset U irta weicnoog counter <» not 
refreshed «1*hln a preset period of lima. Ttws subsystem providte for led safe 
opefarton. 

Motorola providaa aavtnsj devitopmani and emuieiton loots to auppon this new san«e: 
the HOS 300 basotf davatapmarrl srsiam and a oosi efiecttva avaruellon module 
(M66HC0SEVM). 

In i$e». ina 66MC0S88 w«J be available tor >7.S0 In 10K ouentiitet and tha 68HC05&4 
for 1300 In 10K o>andt»a. Tha UC66X60See version w* be pnead si $*9S0 ami is 
ivtuive in limned quanrji m «certing 208S. 
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MC««030 AUOIO CASSETTE COURSE PREPARES USER FOR DESIGN-fNS 

Phoenix. Artiona. Novambar 16. 1*87 , , . raoiorata Samtcoooucio* prodtKik 
SectvTachrwcalOpenrttorta' nmm UC68090 Audio CauanoCaurM: Arvtnrjo- 
ductton K Uw H C8 8O 3 33-flii Mlcrapraaw IUTTA3) prapwws the u»«t 
la Oas>9n with tha newoel 3^6« mlcns>fa3«aDf In lha induilry. Tha *aif- 
peced audio oasona couria contain* uvea upas ilhroa and ona-naif noure 
tong), rgjiy rJluetrateo courao note ■ and related suppoi t litwraiui e The course 
covers the major featurea ol Ihe MC68030 incJudkig data cache. Own mode, 
synennxtovs bus. and irte irtemaj Mamrxy ttantowmani unit upon «uc» 
caaeruj completion, ma jtudent will ha«a a worUng technical ^ng wt aqge ol 
the MCWOM 

The eounse maumat .s oesigned m a ntcduiar tasruyi win cfearfy sJaiMOOreOrves. ooT>D'eherrs<v« 
♦larcaas. »e«-*vaA*»ftons tor eacn moo>*. end supcaerneruai imdv refor»nce» to enatM irw 
learner to cvsuyruv hts leamtg e K o#ne<ve The courso 4 <ft)enoao 10 erjo>4 a Oot-qt* «*»ineer 
or programme* *v«My tan^M with oarber UC4SD0D and MC68020 mccbprocasio/ tamny r-»*tv 
D*r» ro euccvMMy use oi* enhancod WCM030 Motorola s MC88020 sMTtasi euoo cassette 
course Of equivalent e«p»n*ne0 i% j («quit«o prer«oju«rw 



The r/TTA3 (68030) aw*o caaaalta ooune rauutt hy Si2Sj00 Pncuig «mUS dnrtors kv U S 
detvery onty Locaf sates tajt shouK) be added to an orders For Canar>an ordats or aitorma&on. 
can (4te)497-4t6t Omar tocaftnns showV oontad (he* n#ara*t Motor*** bams office 

Tha auOo caaaana course rvgrdgrea thm uma tacTWMcal veormaltOTi aa tha tormal otsirucior-led 

oouraa wrwen wil be ofWwd *t tho Vsl hell at 1B88. To reeeiva m catalag daacrtw^a aX ol Motorola 
Tacrvscal Oparaliona CBwrso taff»rinpa and to order a copy ot tfta MCHdOOO audw c*w*iwi courw 
call Mrto«Aa Tacflntcaj OowratiOrs al 1 -8O0-S2 1 -6274 

Motcrou SamcveJbcto* P>oCuca Soclor TechA£Al Op**etion9 otters a wwjo senactton of iscnnical 

courses r«pging trom courso* *cx non-locrwal i)Wwl*o 10 CDUnMa for «y**»ntB integrators from 

tnoodweiDry courses on 8-MMftJoe*on to wiycmaa*rsm9cr32-W"CtW*axn iwseyau 
Tacrvm^i TreiAmcj cswws vi scheduled »™ tntinmg cmera « ma Unneo 9uji»». Canada, and 
Cufood and ara afso offer ed m South Amenca and the Aai^Pacrltc Cnvmi 



SPECIAL OFFER 

(One Only!) 



/VUJSTAMG-020 12 AAKz modified to run 
12 or 16 Mh*\ 

&<aeHy c= i«wn »-> AA j t mf 02O ad pae« A 



This Is Don \A/llliams' 'persona! system", reason 
for selling - upgraded to 25 AAKz. 

Regular price (16 MHZ with 68881) $5,324.80 

Complete with OS-9 & C 

SAVE first come ONLY $3.895.80 

68 Micro Journal - 615 842-4600 
Ask for Tom, Larry or Don. This won't last long! 

This system has hand-picked components. 
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ATARI 
CALL 



As most of you know, we are very sensitive to your 
wishes, as concerns the content of these pages. One of the 
things that many of you have repeatedly written or called 
about is coverage for the Atari™ series of 6 8000 computers. 

Actually we haven't been too keen on these systems due 
to a lack of serious software. They were mainly expensive 
"game-toy" systems. However, recently we are seeing more 
and more honest- to-good ness serious software for the Atari 
machine. That makes a difference. I feel that we are ready to 
start some serious looking into a section for the Atari com- 
puters. Especially since OS-9 is now running on the Atari 
(review copy on the way for evaluation and report to you). 
Many of you are doi ng all ki nds of interesti ng thi ngs on these 
systems. By sharing we all benefit. 

This I raubt stress - Input from you on the Atari. As 
most of you are aware, we are a "contributor sup- 
ported" magazine. That means that YOU have to do 
your part. This is the way it has been for over 10 years. 
We need articles, technical reviews of hardware and 
software, programming (all languages) and the many 
other facets of support that we have pursued for these 
many years. Also I will need several to volunteer to do 
regular columns on the Atari systems. Without con- 
stant inputwecan'tmakeit fly! So, if you doyourpart, 
we certainly will do ours. How about it? Drop mealine 
or give me a phone call and 1 will get additional 
information right back to you- We need your input 
and support if this is to succeed! 

DMW 
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AT&T 7300 UNIX I>C, UNIX V OS. 1MB Monoid. 20 MB Hard 

Disk. 5" Drive. Internal Modem, Mouse. Best Offer Gets It 

S+ System with Cabinet, 20 Meg Hard Disk A 8" Disk Dr ve with 

DMAF3 Controller Board. 1X12 Terminal S4800. 

DAISY WHEEL PRINTERS 

Qumc Sprint 9 - S900 

Qume Sprint 5 - $800. 

HARD DISK 10 Megabyte Drive - Seagate Model #412 S27S. 

i - Dual 8" drive enclosure with power supply . New in box . S 125 each. 

5 ■ Siemens 8" Disk Diive ,5100 each. 

Tano Outpost II, 56K. 2 5" DSDD Drives. PLKX, MUMPS. S495. 

TELETYPE Model 43 PRINTER -with serial (RS232)inltifacc and 

full ASCII keyboard . S250 ready to run. 

SUvrPC S/09 with Motorola 128K RAM, 1-.MPS2. 1-Paralcll Port, 

MP-09CPU Card - S900 complete. 

Tem (615) 842.4.00 M-F 9AM lo SPM EST 

• •• 

C1M1X SYSTEM: 2 DSDD 8" and 2 SSDD 5" drives. Gimix disk 
cirl. 64K RAM print buffer and 2 RS232 pons. Hex OS9 with lots 
of useful software. 
Best offer. 414.442-5143 
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Clearbrook Software Group (604)853-9H8 



CSG IMS is THE full featured relation- 
al database manager for OS9/OSK. 
The comprehensive structured ap- 
plication language and B + Tree index 
structures make CSG IMS the ideal 
tool for file-intensive applications. 

CSG IMS for CoCo2/3 OS9 L1/2 {single user) $169.95 

CSG IMS for 0S9 L2 or 68000(multi user) $495.00 

CSG IMS demo with manual $30 




MSF - MSDos File Manager tor CoCo 3/OS9 Level 2 
allows you to use MS Dos disks directly under OS9. 

Requires CoCo 3, OS9 L2, SOISK3 driver $45.00 



SERINA - System Mode Debugger for OS9 L2 

allows you lo trace execution of any system module, 
set break points, assemble and disassemble code and 
examine and change memory. 

Requires CoCo3 or Gimlx II, OS9 L2 & 80 col terminal $139.00 



ERINA - Symbolic User Mode Debugger tor OS9 

lets you find bugs by displaying the machine state and 
instuctions being executed. Set break points, change 
memory, assemble and disassemble code. 

Requires 80 column dlspiay. OS9 L1/2 $69.00 



Shipping: N. America - $5, Overseas - $10 
Clearbrook Software Group P.O. Box 8000-499, Sumas, WA 9B295 

OS9 is n trademark of Microware Systems Corp., MSDoi IS a trademark ol Microsoft Corp, 
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SK*DOS 

Tn+ Gt»n»nr OOS " 1o« 68000 HK> <+iiOf* ,n 

* todultnji Conlrf 

* Buf.rwvU** 

* E<*x«t«>nji Cotip"t oq 

* Sc«nc<'< C^npu t'rtfl 

* f*#"*r« Crushing 

* 0«d«cil«d Syitvni 

* Tu'rhry Syrtann 
+ Data Cal-achon 

* S "-Va board Cotnouicfi 

* 8vl Orwittd Computer 

* Grapn<iwo<hiiat.oftt 

* On* of j k ind SyH*ml 

* Advanead HoOOyiH Oic 

SKvOOS .1 • itn^t um' d.*k opa'ali"? tyilam tor (ompotri uj.ng Motorola 32 t»l CPUs 
•jch ii lhi 6800B. 6B0O0 68010 »n<3640?0 M Prov.tJm ihe po**f ol * full DOS, v«l .» 
•irn03« jnd any iq- u «* and wiM run an ivslamt from 32k io 16 tne»»tiviei- B*C4>/W 
SK*OOS n Mwly implamantad on a n** iVHtm «* cill 'I "Th« Gert*r»C DOS" wneh 
allOrvt prOOXmt wnlUn lor ong •.yittrn io tM »uf> On many oiheri 

SK ■OOS conn uVilli ovar 40 tommirdl *nd lYiltrti p»ogramv inctudinq* 6800arnulaior 
whicri allow* OSK SK > DOS io rgn aPPl>caTiOnproar»tnt4ndlanau49^d«v*lol>«d lor 6609 
SK*O0S and olhar lytlaini AuamOi em *d.[*n and tuflhae leva* imguao* luooorl a>v 
availaal* from ihi'd lurry lofiwara vpndort and rrirovfin p<jb><c domain toftwart? 

SK« OOS ■» ava>labl« fey iinfliacovv Ox drller Wrt. ilvreHnOEM l.crritmo, S '"giff copiM 
cOii SI23 ■ ■«qv.»« at to available lyiTtmap Extremely attractive OEM Itcenunc lermtare 
alio au*ltbtt An OPhonal Conln»Jrjfion Kn tmlimi detailed Con I rau ration Manual 
and two duki ol Mure* code tar lyilem adaptation nclud.nq tource code for a system 
momior dMrufl ROM and oinar prog/ ami utetgt lor adapt.'*) SK ■ OOS io new tyitemt 

SK*DOS 




IJH-^-'r fVfVrt 



Star-K 



SOFTWARE SYSTEMS CORPORATION 



»OIOK»I MT KI5CO. N» ICrViO eia'?110:87 
TELEX »IO»e;677« 



INDUSTRIAL PASCAL FOR 68000 AND 6809 

PCSK is a package that generates code tor a 66000 s«ies piocessor 
running on a 68000 development system It includes the compiler. 
assemDIer. linker has) debugger, target debugger, and screen editor 
all integrated together and controlled by a menu driven shell program 
Source code is included tor the runtime library and many of me 
utilities Host operating systems supported are 0S-9/6BO00 
(Microware) PD0S lEynng Research) and VERSAflos (Motorola) 

PXK9 is a package that generates code lor a 6803 processor running 
on a 68000 development system includes all ol the features ol the 
PCSK package above, except lor the host debugger Host operating 
system e OS 9/68000 

I WANT IT, WHERE DO I GET IT? 

For more inlormanon on either ol these two products please contact 
Certified Software South East Media or one ol Our European 
Licensees 



OEM LICENSEES 
Gespac sa. 3. chemin des 
Aulx CH-1228 Geneva/ Plan- 
les-Ouales. Swil; TEL (022) 
713400 TIX 429989 

PEP Eleklronik Systeme 
GmDH. Am Klosterwak) 4 
8950 Kaulbeuren. West 
Germany TEL 108341) 8974 
TLX 541233 

Eltec Eleklronik GmbH 
GalileoGaMelSlrasse 6500 
Mainz 42. Posttach 65. West 
Germany TEL (06131) 
50031. TLX 4187273 



DISTRIBUTORS 

R C S Microsystems Ltd 

141 Uxnridge Road. Hampton 

Hill. Middlesex. England TEL 

01-9792204. TLX 8951470 

Or Rudolf Keil GmbH, Por- 

phystrasse 15. 0-6905 

Schnesheim West Germany 

TEL 062 03/6741. TLX 

465025 

Elsolt AG. Zelgweg |2. 

CH-5405 Baden Da-ell* 

Switzerland TEL 

056 833377. TLX 828275 

Byte Studio Borken. Bulen- 

wall 14, 4280 Borken 

West Germany TEL 

02661-2147 TLX 813343 



CERTIFIED 
SOFTWARE 
CORPORATION 



616 CAMIN0 CABALL0. NIPOM0 CA 93444 
TEl (805) 929-1395 TEIEX 467013 
FAX (805) 929-1395 (MI0-8AM) 



SOFTWARE FOR 680x AND MSDOS 



SUPER SLEUTH DISASSEMBLERS 

EACH »«» FLEX $101 -OSS J100-UNIFLEX 

OBJECT. ONLY MrllM: E»CN ISO. FLEX OSt, COCO 

wtnc***t ganorlla KMU on »*» nth laMrt, mdud* .1.1. t»ra»y toiling 

*«l MO0.I 2 J.S.e.xeSO? ••nun or ItOitClO.i ronton 

OS* vartlon alto procattM FLEX tormal oomel wa undai OS* 

COCO 006 • ••iMBIa In *oM,lJ.J.M.«J«50J tiini (not UOJtTMO SI only 

mil dlllKomNII tlOO-FLEX OS9.UNIFLE) HSDOS.UNIX.SKOOS 

CROSS-ASSEMBLERS WITH MACRO CAPABILITIES 

EACH tS0-FLEX.OS9,UNIFLEX,MSDOS,UNIX,SKOOS 3/1100 ALL S 200 
• ooclty IIOl.lBOI.tlOl/l l.«»C«.««05.»80> Z« ZI0.IO»1.8l>5l.80B5 «I01D32000 
modultr ow ■••■mblcri in C, with loooVbnloMS ulihh«% 
•outCH ktr idailtonol tM Men. itOO Kh 3 tJOO lor U 

DEBUGGING SIMULATORS FOR POPULAR 8-BIT MICROPROCESSORS 
EACH 175-FLEX JI00-OS8 t80-UNIFLEX 
OBJECT. ONLT v.ulono EACH ISO-COCO FLEX. COCO OS« 
lnt«iKIN«r VnMU P>oc*M«r>. xloi »»"««/ tomunog, tern odnrrj 
•okiv kx seoo/i. itouas, oot. moi OS9. zu flex 

ASSEMBLER CODE TRANSLATORS FOR 6S02. 6800/1, 6308 

•MS IP WOI IISFLEX Hi-OS» liW.UHIFLEX 

«KX»1 M MM » MOI IO mwttM IIO-FIEX SHOSl KO-UNlFLEX 

FULL-SCREEN XBASIC PROGRAMS Mil c«u< control 
AVAILABLE FOR FLEX, UNIFLEX, AND MSDOS 
OIS°LAT OCHEFUrOrVOOCUUENTOR <H ■fouCM. ai »it»oul 

twiLWG uarsvstEM iiw ..>u»e*. tsa ^atooi 

■MVENtOnv WITHUFtP 1100 . lOu'C. ISO wtinout 

T«4UU FMS* SFOEUDSHEET 1100 Wfoowu. ISO 



DISK AND XBASIC UTILITY PROGRAM LIBRARY 
J50.FLEX tlO-UNIFLEX/MSOOS 

•On M MX3WX Fort oVodory, wun nww CAUIOD. do *>* ions. 
nva •om« nil « BASC prooMB. u*t SKSIC a>nyivn. «c. 
(ton FVEX wruoni »«**fe tori and t»BFOJ>TH»* or*y 

CMODEM TELECOMMUNICATIONS PROGRAM 

(1D0-FLEX,OS8,UNIFLEX,MS-DOS,UNIX.SKDOS 
OtUECr.OMLY v*ltl«r» EACH tio 

FWtgltMi wft) mnwtti fflodl. I* bantltr. MOOEMJ, XONJIOFF. «rc 
lor COCO and MA COCO. drFrat Mrrmjr COCO mnoVm port up to 2*00 Baud 



DISKETTES & SERVICES 

3 23" DISKETTES 

EACH 10-PACK S750 SSSOSSOOOSDD 

Anwrcin man*. Qu**«ni»*jd \0tt\ quality m-m T»v# iwk#tv hub i 



ADDITIONAL SERVICES FOR THE COMPUTING COMMUNITY 
CUSTOMIZED PROGRAMMING 

w« will culktrnlii «>>r or irni proof jm» 0t*CrtOtO a «i »XK«fl4«fll«nl Of m our 
tvochui* KX iO#eijiii:*Ki *u*w»r,of uu Or io «v#r ■>•«* pnem* to«_ tha charge 
tat tuch OJUofflLiaiKMi duptrite upor> ilw <TuiAalafiU.lv m ina mod»Kal-w» 

CONTRACT PROGRAMMING 

*♦ Mtll craala na«r ptogumi or (notVv aiLtiino (KOo't-nft 6n i oonttaci baft 
a wry to* *• hava ffovlOad tor ovar r*tii vaara. tr* axnaMn on wMcrt w« 
fiiava paOonrad oofMtaci ptoQitnvr+iQ ***** mow POOwltr modatft of 
mamwama*. uViWWxj iQM eVn^of », Unkv«e. Hcnar^l . mo«l poewtar 
modal* of wfc «JJnw **«» , indtyj»ma 0€C. IBM, OQ, HP. AT&T, and moy 
OooulM tFanda oi .ntvoampkAit. trxAvAnfl MOCVI. &809, 280. 6502 
MOiO. uitrtfl moil •vcrckpiuua l«VQn end oparaMg waiamt. on tnktm 
ranging hi ft* from larga l»aKsma^#««twnA lo wnoto boarrj co ni t o«an . 
tft* c^a*v* to* oonpad praorarrvnirtQ t» t/iu*** o> cn« f*pu« ex o> ffta talk 



CONSULTING 



ranga of owfnau ana 



tA9mc3. raiftivjtiAo iwctt vvtwOng 
n. on any tope ratalad to <sirf>wn 
OaxaO vpon tan* »»va» and c«n.P*i*a 



Computer Sy*ttm» Coniullinls. Inc. 

M5« Litti Lina. Cony«ri r GA 3020r 

Talaphont 404*483-4370 Of 1717 

W# laha ord«ri il any .im». bul plan 
long dlicuiilom alter 6, if pois.oie- 

Coniaci ua aboui caUlog, daaitr, discounrm, and aarvictm. 
Moat program! In aourca: glya computer, OS. disk size. 
23% oft mull I p la purchaiea ol same program on one order. 
VISA and MASTER CARD accepted; US lundi only, pleeae. 
Add GA aalea (ax <H In GA) and S% shipping. 

(IINUFliX W TacAmcal «T»»amt CanWtOAM 0&9 It^tommrm 
COCO f i«y AADCU IfejOaoA-SKOOS ftorh SoAwtv* 
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The Only 6809 BASIC to Binary Compiler for OS-9 

FLEX or SK*DOS 

Even runs on (he 68XXX SK*DOS Systems* 



^- ....... ..... N 

Hundreds Sold at 
Suggested Retail: 

$100.00 



• 6809 - OS-9"" users can now transfer their FLEX™ 
Extended BASIC (XBASIC) source files to OS-9, com- 
pile with the OS-9 version and run them as any other 
OS-9 binary "CMD" program. Much faster than BASIC 
programs. 

• 6809 - FLEX users can compiler their BASIC source 
files to a regular FLEX u .CMO" file. Much faster execu- 
tion. 

• 68XXX - SK*DOS™ users tunning on 68XXX systems 
(such as the Mustang-08/A) can continue to execute 
their 6809 FLEX BASIC and compiled programs while 
getting things ported over to the 68XXX. SK'DOS 
allows 6809 programs to tun in emulation mode. This is 
the only system we know of that will run both 6809 & 
68XXX binaiy files. 

K-BASIC is a true compiler. Compiling BASIC 6809 pro- 
grams to binary command type programs. The savings 
in RAM needed and the increased speed of binaiy 
execution makes this a must for the serious user. And 
the price is now RIGHT! 

Don't get caught up in the "Learn a New Lan- 
guage" syndrome ■ Write Your Program in 
BASIC, Debug it in BASIC and Then Compile 
it to a .CMD Binary File. 



For a LIMITED time 
save over 65%.., 
This sale will not be 
repeated after it's 
over! * 

SALE SPECIAL: 

$69.95 



SPECIAL 

Thank-You-Sale 



Onfy Jrom: 



c 



S. E . Media 



p 



i 



5900 Cassandra Smith Rd. 

Hixson, Tn 37343 

Telephone 615 842-6809 

Telex 510 600-6630 



A Division of Computer Publishing Inc. 
Over 1,200 Titles - 6600-68 09-63000 



K-IJASIC »ill mn unix 68XXX SK'IXJS m onulnicn mode for the 6SW. 
Piioc subject ■» duogc wahcul notice. 
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NEW! 



Color 
Computer 
"No Hair* 

Disk 
Controller 

. I rial (II the slew iiopot disk ©entreilere tot in* CoCo eompMHety lie up (and 
evwt halt} th« 6809 prooMWf during disk reads and writes? No wonder your 
keytoerd !• eonelsntly "loslno" cliiiKlnl Or that your serial port oiler, gives 
yeuOt/bsee. 

Unleash v«ir CvCe'e »e*e»Bett 

Ov' naw Oual Moda Conirollar (OMC) implamanti a new "no hall" mods ol opera- 
Hon ao It can reed Irom or wiUe to disk all by llaelt. Tne 8809 la Iraed to process 
otnat tasks and respond to Interrupts Thla la r>ow OS4 was meant to runt But trie 
Radio Shack "hall* moos of operation la also retained to maintain lull oorrv 
patlblllly with aiming noo-OS9 sollwsra. 
Other OMC teeiureei 

• works with original CoCo, CoCo 2, or CoCo 3 (Multl Pak required) 

• no adjustments - elldlgliel data aapsralor and wrlta preeompansatlon 

• gold platad cerdedge connectors lor rallablllty 

• ROM aockal takas 24 pin or 20 pin chips; dusl DOS capability 

• Radio Snack DOS I 1 ROM Installed 

• JK bylaa cacna memory on board I32K b Isa optional) 

• includes DP Johnson's SOISK package specially modified lor the OMC 

• lully assembled and teslao, 120 day limned warranty 

T**r«*n OMC controller with RS0OS II and SOISK lUenl lor ll)tu»»plu>S5 
$M (112 overseas) Tarma (prices In SUSV. check, money order. VISA 



(trademarks: OSvB - Mlcrowara and Motorolai 



e>04| 2SS-44(5 (Pactlm Timet 

Our ST-2900 SBC la il.ll available, 

call or write lor catalogs price-list 



T T£<HN<>L 5-l<>> 

2261 Cast 11th Ave., Vancouver. B.C., Canada V5N 1Z7 



INDUSTRIAL COMPUTER SYSTEMS 

68008 ■ 68020 VME STD SBC 

STD BUS I/O OS9 

II ILL WrST INCORPORATED products and services ire intended Tor 
industrial users of microcom ptilers who are looking for a supplier prepared 
to provide complete engineering and technical support. We coiiligure 
systems with componems aitd software selected or designed to met* specific 
custcaner requirements, Wc specialise in solving industiial IrO problems. A 
full range of services is available including system specification, integra- 
tion, and installation, hardware design and production, and system and 
application prog ramming. 

SYSTEMS 
Itll.L WEST INCORPORATED provides microcomputer systems con- 
f igutcd lo meet the needs of pellicular customer applications. These systems 
use 68000 family processors and the OS 9(1 m) operating system. We design 
and coiiligure systems based on VME bus, STD bus, and single board 
computers, with processors ranging from the 6809 to the 68020. Disk based 
and HOM based systems ere suppoilcd. Systems for development and target 
applications on be supplied. 

I/O EXPANSION 
The STD bus is an excellent I/O expansion bus. Many off-lhc-shelf 
interfaces ere available, from simple paiallel interfaces and intelligent 
communication control) en lo pneumatic valves and radio receivers on card. 
DWI inteifaccs the STD bus lo systems via the Motorola I/O channel, the 
SCSI interfaee, and ARCNET.The STD bus may be configured as a simple 
expansion bus, an intelligent subsystem, or a remote I/O system. 
MACINTOSH AND ATARI ST EXPANSION 
Expansion slots may be added to Mednlosh(tjn) or Atari ST(un) systems 
using the STD bus. Conned an STD expansion bus via the SCSI poii, and 
use any of the wide variety of STD bus interface onk 

BILL WEST INCORPORATED 

174 Robert Treat Dr., Milfbrd Connecticut 06460 

203 878-9376 
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DATA-COMP 



SPECIAL 



Heavy Duty Power Supplies 




^ 



For A limited time our HEAVY DUTY SWJTCWNC POWER SUPH.Y. These am BRAND NSW units. Note that these 
prices are less than 1/4 the normal price for these high quality units. 



Make: BosdVrl 

Size 10 5 x 5 x 15 inches 
Inrfutling heavy mounting bracket and hcanink. 

Rating; in 110/220 volts at (soap change) Out 130 watts 

Output +5v - 10 amps 
+12v -4.0 amps 
+12v . 2.0 amps 
-12v . 0.5 amps 

Mating CulBlT Terminal strip 
Load Reartksv AukrnarJc *cei circuit nxuvcry 

SPECIAL: $59.95 each 
2 or more $4555 each 

Add: S7J0 each S/H 



^ r 



J K. 



Make: Boschert 

Six: 10.75 x 62 x 215 inches 

Ruling: 110/220 ac (sffap change) Out 81 watte 

Outpue: +5v . 8.0 amps 
+ 12v - 24 amps 
-t-12v . 2.4 amps 
+12v . 2.1 amps 
-12v - 0.4 amps 

Mating GtmatlS Moles. 

Load Rcacacrc AaOctnaDc short rircuii recovery 

SPECIAL: $49.95 each 

2 or marc $3955 each 

Add: SIX S/H each 



5900 



Smith Ret, Hhrson, Tn. 37343 Telephone 615 842-4600 



Telex 510 600-6630 



J) 



60 



January "88 



G8 Mere- Journal 



THE 6800-6809 BOOKS 

..HEAR ye. HBAR 



OS-9* 
User Notes 



By: Peter Dibble 

The publishers of 68' Kicro Journal are proud Co make 

available Che publlcadon of Peter Dibbles 

0S9 USE1 BOTES 



Infor 



■ Clos for the BECINMER to c be PKO, 
tegular or CoCo 0S9 




B.lng 0S9 
HELP, MINTS, PROBLEMS, REVIEWS, SUGGESTIONS. COMPLAINTS, 
0S9 STANDARDS. Ceneraclnc a New Boocscrap, Building a 
new System D4.sk, 0S9 Users Croup, etc. 

Prograa interfacing to 059 

DEVICE DESCRIPTORS. DIRECTORIES, "FORKS". PROTECTION', 
"SUSPF.ND STATE". "PIPES", "INI'UT/OUTPl'T SYSTEM", etc, 

PrograaBlog Languages 

Assembly Language Programs and Interfacing; Baslc09. C, 
Pascal, and Cobol reviews, programs, and uses; etc. 

Disk* Include 
No typing all the Source Listings In. Source Code and. 
where applicable, assembled or compiled Operating 
Progran*. The Source and Che Discussions in Che 
Columns can be used "as Is", or as a "Scarcing Point" 
for developing your OWN more powerful Programs. 
Programs sometimes use multiple Languages such as a 
shore Assembly Language Routine for reading a 
Directory, which Is Chen "piped" co a Baslc»9 Routine 
for outpuc formatting, etc. 



BOOK $9.95 

Typesec -- w/ Source Listings 

O-Kole Punched; 8 x II) 

Deluxe Binder ----- - - - $5.50 



All Source Listings on Disk 

1-8" SS. SO Disk - - - - $16.95 
2-V SS. DU Disks S24.95 



FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publishers of 68 MICRO JOURNAL are proud Co 
make available c he publlcadon of Ron Anderson's PLEI 
OSES NOTES, In book form. This popular monthly column 
has been a regular feacure in 68' MICRO JOURNAL SINCE 
979. Ic has earned Che respecc of chousands of 
68 MICRO JOURNAL readers over Che years. In fact, 
n's column has been described as Che 'Bible' for 68XX 
users, by sowe of Che world's leading tdcroprocessor 
professionals. The nose needed and popular 68XX book 
available. Over Che years Ron's column has been one of 
Che most popular In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL is Che most popular 68XX magailne 
published. 

Listed below are a few of Che T8XT files Included In Che 
book and on diskette. 

All TEXT files >n the book are on the disks 



LOGO C1 Pile load oioo/am lo onset memory — ASM PtC 

MEMOVE C1 Memoiy move program — ASM PIC 

DUMP C1 Primer dump program — uses LOGO — ASM PlC 

SUBTEST C 1 Simulalion ol 6800 code 10 5809. show dillerencas — ASM 

TERMEM C2 Modem mpul 10 disk (or other pon input lo disk) — ASM 

M C? Oulpul a (He lo modem lor anolnei pon) — ASM 

PRINT C3 Parallel (enhanced) printer driver — ASM 

MODEM C2 TTL Oulpul lo CRT and modem (or olher pod) — ASM 

SCiPKG Cl Scientific math routines — PASCAL 

U C4 Mini monitor disk resident many useful (unctions — ASM 

PRINT C4 Parallel prinler driver without PFLAG — ASM 

SET C5 Set printer modes — ASM 

SETBASl C5 Sel printer modes — A BASIC 

NOTE: .C1..C2. etc. 'Chapter I, Chapcer 2, eCc. 

• •Over 30 TEXT flies Included is ASM (assembler)-PASCAL- 
PIC (position Independent code) TSC BAS1C-C, etc. 

Book only: $7.95 + $2 50 S'H 
With disk: 5" $20.90 + $2.50 S H 



With disk: 8" $22.90 + $2.50 S/H 
Shipping A Handling S3 50 per Book. $2 50 per Disl set 

Foreign Orders Add $4 SO Suit ace Mail 
Df $7 00 Air Mail 

If paying by check - Please allow 4-6 weeks delivery 

* All Currency in U.S. Dollars 

Continually Updated In 68 Micro Journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



"KLLX Is a trademark ol Technical Systems Consultaries 

~OSS Is a trademark of rticroware and Motorola 

"6H* Micro Journal la a trademark of Computer Publishing Inc. 



(615) 842-4601 

Telex 5106006630 
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!!! Subscribe Now !!! 
68 MICRO JOURNAL 

OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Mastercard □ VISA| | 



Card# 



. Exp. Dale_ 



For 1 Year 



2 Years 



3 Years 



Enclosed: S 



Name 
SI reel 
City 



State 



Zip 



Country 



My Computer Is: 



Subscription Kates 



U.S.A.: I Year $24.S0, 2 Years $42.S0, 3 Years $64.50 
*]-iireiyn Surface: Add $12.1)1) per Year to USA Price. 
•Foreign Airmail: Add $48.00 per Year to USA Price. 
•Canada & Mexico: Add $9.50 per Year to USA Price. 
♦U.S. Currency Cash or Check Drawn on a USA Itank ! 

v, J 

68 Micro Journal 

5900 Cassandra Smith Rd 
POB 849 




ISA 
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Mixson.TN 37343 

Telephone 615 842-4600 
Telex 510 600-6630 
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Reader Service Disks 

Disk- 1 Rkiort. Minicit, Minicopy,Minifms. ••Lifetime, "Poetry. 

••Food lilt, "Diet. 
Disk- 2 Diskedit W inn. A fixes. Prime, *Pnnod. ••Snoopy, 

"ftxuhall. " I lexpiini." Lifetime. 
Disk- 3 Cbogoo. Sccl. Scc2, Find. Tible2, Iniext. Disk-cxp. 

•Oiikuve. 
Disk- 4 Muling Progrim. 'Finddu, 'aunge, *Testdisk. 

Disk. 5 •DISKFDC I. •D1SKFDC 2. "IbTFER, "LOVESICN, 

"BI.ACKJAK, "COWLING. 
Disk- 6 "Purchase Older. Index (Disk file indx). 

Disk- 7 Unking Loader. Rload. Darkness. 

Disk- 8 Cnesi. Lanphcr (May 82). 

Disk. 9 Dalecopy. Diskfu9 (Aug 82). 

Disk- 10 Dome Accounting (July 82). 

Disk- 1 1 Di ncmblcr (June 84). 

Ulsk-12 Modcm68 (Miy 84). 

Disk- 13 ♦Iniunf68, Tcstmr68. , CIcanup,'Dska]ign,Hc]p,Da[e.Txt 

Ulsk-14 •lnii, *Te»l. •Termini], •Find, •Diskedii. IniLLib. 

Ulsk-IS Modcm9+ Updates (Dec. 84 Gilchrist) to Modcm9 

(April 84 Commo). 
Disk. 16 Cbpy.Txi, Copy.Ooc, CatTxt, Cat.Doc. 

Olsk-17 Match Utility. RAID AS. A Italic Preprocessor. 

Disk- 18 Paiie.Mod. Size Cmd (Sept. 85 Armstrong), CMDCODIi. 

CMDTxt (Sept. 85 Spray). 
Disk- 19 Clock, Date. Copy, Cat, PDEL Asm & Doc., Errors. Syj, 

Do, Log Asm & Doc. 
Disk. 20 UNIX Like Tools (July A. Sept. 85 Taylor A Gildir a). 

Dragon C. Gicp C. LS.C. FDUMP.C. 
Dlsk-21 Utilities & Gaines- Date. Life. Madness. Touch. Goblin, 

Slarshot, &. 15 more. 
Dlsk-22 Read CPM A. Non-FLEX Disks. Fraser May 1984. 

Dlsk-23 ISAM, Indexed Sequential file Accessing Methods. 

Condon Nov. 1985. Extensible Table Driven. Language 

Recognition Utility, AiYScrson March 1986. 
Disk- 24 68' Micro Journal Index of Articles A Bit Bucket Items 

from 1979 - 1985, John Current. 
Dlsk-25 KKR.MIT for FLEX derived from the UNIX vcr. Buig 

Ixb. 1986. (2)-5" Disks or (l).8" Disk. 

Dlsk-26 Compacla UruHoard review, code & diagram, Burlison 

March '86. 
Dlsk-27 ROTAHIT.TXT, SUMSTIsST.TXT. CONDATA.TXT. 

llAiJMI-N.TXT. 
Uisk-2K C1'-82 liinulalor, bit mapped. 

Disk-29 "SiirTrck 

Disk -30 Simple Winchester, Dec. '86 Green. 

Dlsk-31 "• He*l/W,ite MS/PC-DOS (SK'DOS) 

Dlsk-32 lleir-UNIX Type upgrade - 68.MJ 2/87 

l>lsk-33 tluilU the OT-4 Tcnninal - 68MJ 1 1/87 Condon. 

NOTE: 

Tliit is a reader service ONI .Yl No Warranty is offered or implied, they are 
as received by 68* Micro Journal, and are for reader convenience ONLY 
(some MAY include fixes or patches). Also 6800 and 6809 programs arc 
mixed, as each is fairly simple (mostly) to canven to the other. Software is 
availible to cross-assemble all. 

• Denotes 6800 - ♦• Denotes BASIC 
••• Denotes 68000 - 6809 no indicator. 



8" disk $19.50 
S" disk $16.95 




1 


p^"^^paa^™^^ 


■ 




MasterCard 


1 


1 


k^^^BST*. ri 


• 



Shipping & Handling -U.S.A. Add: - S3 .50 
Overseas add: S4.S0 Surface - $7.00 Airmail 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 

Hixson.TN 37343 

(615)842-4600 - Telex 510 600-6630 
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6809/68008 SINGLE BOARD COMPUTERS 

The Peripheral Technology Family of Single Board Computers is a Low-Cost Group Which 

Ranges From an Entry Level 8-Bit Version to a Powerful 68008-Based Board. A Product is 

Available to Fit Almost Every User's Requirements. 



PT69-5 

• 6809 Processor/2MHZ 
Clock 

• 4 RS-232 Serial Ports 

• 2 8-Bit Parallel Ports 

■ 4K-16K EPROM/60K Ram 

• Parallel Printer Interface 

• DS/DD Controller for 35-80 

• Track Drives Ranging From 
SS/SD-DS/DD 

• Winchester Interface Port 

Price: $315.00 



PT69-3 

• 6809 1 MHZ Processor 
■ 2 RS-232 Serial Ports 

• 2 8-Bit Parallel Ports 

• 4K EPROM/59K User Ram 

• DS/DD Controller for 35-80 
Track Drives Ranging From 
SS/SD-DS/OD 

Price: $249.95 
OS9 LI For 
PT69 BOARDS $200 00 
SK'OOS $ 49 95 



PT68K-1A 

• MC68008 12 5 MHZ 
Processor 

• 768K RAM/64K EPROM 

• 4-RS-232 Serial Ports 

• Winchester Interlace Port 

• Floppy Disk Controller for 
4 5+" Drives 

• 2 8-Bit Parallel Ports 

BOARD: $499.00 

with Professional OS9: $895.00 

withSK'DOS: $595.00 



■fVjjBa 



PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Road. Suite 870 

Marietta. Georgia 30067 

(404) 984-0742 Telex # 880584 

VISA/MASTERCARD/CHECK/C.O.D. 
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"OS9 Is A Trademark Of Mtcroware and Motorola. 



Send For Catalogue For Complete Information On All Products. 



XDMS-IV 

Data Management System 
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Technical Iclcphont luhlince: Tel 914.941-3552 (EvailngI) 
"LEX" 1 Tccntcil Systems CanmllinU. SK-DOS"* STAR.KITS Corp. 
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FOR 6809 FLEX-SK-DOS(5/8") 

Up to 32 groupbfield* per mad) Up lo 12 character (Heel mmet Up to 10J4 byte records! Uaer 
defined screen ind print comml! IW«i fuesl Horm Qc*t Conditional ucatoon! Prop** 
chaining! Upward/DDwrtwud file unkingl ink; joining! Random lilc virtual psging! Buili in 
utiliiie*T Built in text line editor! Fully session orieuiedT Enhanced Cairo! Boldface,, Double 
width, lutwj end Underline fuppartcdt Wr.ncn in compget atructured assembler^ Intcgritad for 
FAST eseculion? 

XDMS-IV Data Management System 

XDMS-IV ti ft brand new approach to data management. It not only permits users to 
ri a ^ ri h* . enter and. mricvo dais, but also to proscD entire Qc* pnxlucxiig cucUMTtiud reports, 
screen displays and file output. Processing can consist of any of a set of standard high level 
functions including nctnd snd field selection, sorting and aggregation, lookups in odtct files, 
special processing of record subset*, custom report Fbmiauing. totaling snd aobtou]ing t and 
pnszualion ofuptothree relai»d files as a 'database* on user deflnad output fr^nr**. 
POWERFUL COMMANDS: 

XDMS-IV combines the functionality of many popu lar DB MS software systems with a new easy 
to use command set into a single integrated package. We've included many new features and 
cunmaiuU including a set of general file utilities. The processing commands 4/c Inpil-Process- 
Ouxpui (IPO) oriented which allow* aim oat irtfU/U implementation of ■ pnnas design. 
SESSION ORIENTED! 
XDMS-IV is session oriental. Enter "XDMS" and you are in instant command of all the 
features. No more waiting for a command lo load in fron disk! Many cammanda are immediate, 
such aa CREATE (file definiuon). UPDATE (ale editor). PURGE and DELETE (utilities). 
Others an? pm=csa commands which are used to create a user process which is caecuted wilh a 
RUN command. Either may be entervd into a "proc***" file which is executed by an EXECUTl: 
statement. Prorate* may execute other processes, or ihaniclvcs. either conditionally or 
unconditionally. Menus and screen prompts are easily c&tag, and entire user applications can be 
ran without ever leaving XDMS-I V! 
ITS EASY TO USE! 

XDMS-IV keeps data management simple! Raihcr than design t comples, DBMS which hides the 
Vuenslure of ihe data, we kept XDMS IV file oriented. The user view of data relationships u 
presented in reports and terras* output, while the actual data reside* in easy lo maintain file*. This 
aspect permit* CUstomi»cd presentation and reports wiihout complcs nsdefin iiion of the database 
File* and (Dvcyutc XDMS-IV may be used for a wide range of applications fmm simple record 
management aysierro) (addresses, inventory ...) to integrated database systems (order entry, 
accounting.,.). The pnasibiihies anaunhrnited.,. 

Visa & Master Curd Excepted 

Telephone: 615-842^601 or Telex: 510 600-6630 

Or Write: S.E. Media, 5900 Cassandra Smith Rd.. 

Hfxson, Tcnn. 37343 f 
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THE GMX 020BUG DEBUGGER/ DIAGNOSTIC PACKAGE 



This extensive firmware package provides a broad range ot 
program developmeni tools and a complete suite ol diagnostic 
programs for exercising GMX Micro- 20 hardware 

The debugger Includes commands for displaying and modifying 
registers and memory If the optional 68881 Floating-Point 
Coprocessor Is Installed. Its registers are also accessible. Memoiy 
can be displayed In hexadecimal and ASCII formal, as floating-point 
values (single, double, extended or packed formal), or as 
disassembled Instructions {Including FPC instructions). Memory 
modify can be done with hexadecimal values, with ASCII strings, 
with floating-point values, or with a one-line assembler which 
supports the full 68020 Instruction set (although not the FPC 
instructions). Block move, fill, and search are also available 

Several dillerent modes for tracing or executing user programs 
are provided, along with a powerful breakpoint facility Programs 
and data may be downloaded from a host system or uploaded back 
to the host, and the GMX Micro- 20 console may be used as a host 
system terminal. A serial printer may be hooked up, and used to 
make hardcopy listings of debugger sessions as desired 

The diagnostic firmware includes 90 lest commands and 16 
utilities. Complete lest suites are provided for each functional block 
of Ihe GMX Micro-20's hardware, including, for example, 9 



diflerenl tests for memoiy, 9 tests for serial I/O pons, 2 tests lor 
the 68881 FPC. and 9 tests for the optional memory management 
unit. For the peripheral control interlaces ((loppy disk. SASI/SCSI 
hard disk or tape), lest commands support a broad range of 
peripheral operations (read, write, formal, etc.) so thai ihe user 
may lest both the Interface and an attached device. Teste are 
provided for add-on I/O boards. Including Ihe ARCnel Interlace. I/O 
Channel interface, and parallel and serial expansion boards. 

The utility commands allow the user to execute groups of test 
commands conveniently, repeat commands or command groups, 
enable or disable detailed fault reporting, count detected errors, or 
execute all the non-peripheral tests as a group. A switch option 
allows this last function to be invoked automatically al power-on or 
reset. Other utilities allow Ihe user to check the stale of the various 
jumpers and switches on Ihe GMX Micro- 20 directly. 

In addition to the Diagnostic command package. 020Bug 
contains a conlidence lest which is always run alier power-on or 
reset. This test does a quick checkout of the processor and the 
basic system elements that are needed for 020Bug operation, 
delect Is found, an error code Is signalled by on-and off thinks 
LED. 



$ 



DEBUGGING COMMANDS 



MD - Memory display 

MM — Memory modify 

MS - Memoiy set 

BF - Block llll 

BM — Block move 

BS — Block search 

BO - Register display 

BM - Register modlly 

OF — Otlsel i*glsters 

BR — Breakpoint set 

NOBR - Breakpoint delete 

6 — Go to target tode 

6D - Go, date* orotfcprfflfc 

SN - So, stop after 1 instruction 

GT - 0» set temp breakpoint 

T — Trace 

TC - Trace on cunge of flow 

TT Trace k> tornp Urea keci m 

LO - download 

OU - Upm*} 

VE - Verify download 

TM - Terminal mode 

PA - Pilnter attach 

NDPA - Remove printer 

Ff - Port formal 

TO - Time display 

TS - Time set 

SD - Switch directory 

RS — Reslarl system 

OS — Boot operating system 



DE — Display errors 



U 
OP 
2P 
RL 
WL 
DJ 
BS 
MJ 
«t 



— Zero errors 

— Display pass count 

- Zero pass count 

— Read loop 

- wnie loop 

- Display com) rate lumper 
-Display switch 

- Display MMU Board jumper settinfi 

— Scan I/O expansion space 



«j ratelui 
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FPC control function* e - Read 
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UTILITY COMMANDS 



NV 
SE 
LE 
LC 
ST 
STl 



Nort-verOOse mode 
' Stop on error mode 
Loop on error mode 
Loop continual mode 
Selttesl mode 
Settles! with LEO mode 



TEST COMMANDS 



AN — ABJCnet Irrterttfle) teste 
A - Wakeup test 
B - DIP Switch test 
C — Inteirupts lest 
D — Buffer test 

CA20 • On cltfp cecfte tufa 
A — Basic caching 
B - Unlike lunciion codes 
C - Disable 
D - Clear 

FO - Floppy disk taite 

A - Set parameters 

B — Drive select toggle 

C — Side select toggle 

D — Restore 

E - Seek 

F — Foi mil track 

6 - Read 

H - Writs 

I — Copy bulter 

J - Compare bulrer 

K - Fttl butler 

IC - I/O Channel bits 
A - Prim lest partem 
B - Bll relate 

MH - MbuliMou* hwdwira tats 
A - 68881 FPC instructions 



IX^ 



B -68881 

C — "Tick g»JBra tor 

-lafcrruptsourpes 

- Me*** tolls 
A - Set function node 
B - Set Aft address 
G -Sir en aeteresj 

1 t Nape* imejte* test 
E - March afJdress lesi 
F — Walk-'a b1 test 
Q - Relresh test 
H — Random byte lest 
I — Progiam test 
J - TAS test 
K - TestOOOOlFFF 
L — Partial longword writes lest 

MU - Mmiwv Mininemeflt onto 
A - Map RAM data lest 
B - Map RAM address test 
C — Map RAM partial wiile test 

— Map RAM random data' lest 
E - Accessed bit reset test 

F — Address mapping test 
G - Accessed /Dirty ote test 
H - Valkt/Wilie Enable test 

1 — Task size test 
PP — Pmlti peri lam 

A — Piinl lest pallern 

B - Continual lesl bii pattern 

C — Test bll partem for 10 sec 

PX - PinfW I/O expansion toerd tats 
A — Data, handsliake. and IRO test 
B — P4 connector test 
C — Data and hand sliake toggtt 

SA - SASI/SCSI port wftk SASI device 
A - Select drive 
B — Scan data lines 
C — Restore 
D - Seek 



F -Write 

Q - Compile butters 

H - Fill write butter 

t -lest interrupt 

J - Park head 

K — Formal 

SC - SASI/SCSI perl urttt SCSI 

A — Select drive 

B - Scan data lines 

C — Restore 

- Seek 
E - Read 
F - Write 

Q - Compare buflers 

H - Fill write bulter 

1 - Test interrupt 
i - Stop drive 

K — Formal 

SI - Serbl I/O tats 

A - Select DUARTs 

B — Internal knpback 

C - External loopoack 

D — Baud rates 

E — Parity modes 

f — Character lengths 

Q - Hand shake lines 

I - BREAK detect 

J — interrupt output 

K - Continual handshake toggle 



TA- 



Tipe drive tats 

A — Rewind 

B - Read 

C - Write 

E — Compare buflers 

F - Fill write bulter 

G - Erase 



CfTlX 1337 W. 37th Place, Chicago, IL 60609 
(312) 927-5510 — TWX 910-221-4055 — FAX (312) 927-7352 
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Now Offenng *FLEX" (2 Versions) 
AND 'STAR-DOS PLUS+ '" 




For Otttmrtng Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX" on 

The CoCo 
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STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads • writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run 'STAR DOS" 

• Over 300 utilities & programs 
to choose from 



f 


TSC Editor 




NOW $35.00 


L 


y) 



PLUS 

ALL VERSIONS OF FLEX & STAR-DOS 

+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free UtJities 




INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoty Examine Program 
+ Many Many More!!! 



TSC Assembler 
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NOW $35 OO 
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CoCo Disk Drive Sgsleuis 



2 TH1NLINE DOUBLE SIDiO DOUBLE DENSITY DISK DRIVES 
SYSTEM WITN FDUEE SUCI-L* .CAIINtT, 01SI OllVE CARLE. JiH 
NEW DISK CONTROLLER JP0-CP VJTH J-OOS.RS-DOS OPERATINC 
SYSTEMS. |4*«.») 

• Spiel (y What CONTROLLER You Want JAN, or RADIO SHBCX 

TMINLINE DOUBLE S1DE0 
DOUBLE DENSITY *0 TRACKS 



MK VPCSAOi 

FOR C.0,E, P, AND COCO II 
RADIO SHACK BASIC I. 2 
EAD10 SHACK DISK BASIC 1.1 



Verhjhm Diskettes 



Sinftlf Sldad Doubl« DtDtity 
Deubl* Sided Double Deoelty 



Cooli oilers 



JtN JPO-CP WITH J-0OS 
WITH J-OOS, KS-OOS 
RADIO SHACK ] . I 

RADIO SHACK Diik CONTROLLER 1.1 



Disk Di ive Ciu!>-'> 



Ceble for One Drive 
Cable for Two Drive* 





DISK OltVE CABINET POl A 


III*. as 


SINGLE (WIVE 




DISK DRIVE CAEINET POl TWO 




TK1NLINE DRIVES 


} 14.00 


nirruj 


} 14.00 


EPSON U-BO 




EPSON HX-70 




EPSON KX-100 


•139. 95 


ACOMoaiE* rot ifboc 


$119. *» 




tiM.aj 


61*6 2E SEEIAL BOARD 


81*9 32K EXPAND TO I2BK 




EPSON MJ-M-UO KIIMNS 


413*. aj 


EPSON LX-80 ElEtONS 




TEACTOE UNITS PO« LX-BO 




CABLES 4 •THE* IHTCK/ACKS 




CALL POR PRICING 


i la.tj 




i 24. as 





I 29.95 



t 24. as 
i 24. as 



* 4».»5 

t ta.as 



B2M.9J 

•us.aj 
$»*i.*i 



JI49.95 

» s.as 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 
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SHIPPING tS* 

f^:^ d ^" s .| (615)842-4600 

n(H. $2.50 'Of OtoWring 

Telex 5106006630 
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An Ace of a System in Spades! The New j 

MUSTANG-08/A- 



Now with 4 aerial port* standard Be. speed Increase to 12 Bfhz CPU + on board battery 
backup and Includes the PROFESSIONAL OS-9 package - WHsiHufl the $500.00 OS9 

C compUerl lids offer wont last ftucvcit 



NOT 128K. NOT 512K 
FULL 768K No Wait RAM 

The MUSTANG-08™ system look svory hand from al 
other 68008 sysems we tested, running OS-9 68KI 

The MUSTANGS includes OS9-68K™ and** Peter 
Starks SK*D06™. SK*DOS is a single user, single tasking 
system thai takes up where *FLEX™ left off. SKTJOS is 
adualy a 68XXX FLEX type system (Not a TSC ptoducL) 



Now even faster! 
with 12 Mhz CPU 



C Campffe times: 0S« 68K. Hani Diak~~^ 
MJ5TANG0B 8Mb CPU Omfo-Msee 



Oher popute ffiOCfl system 1mfei>05i 

MUSTANMM 0(1*1-21 1 



J 




CPU 


Mceeooe 


12 Ntc 


RAM 


768K 

No Wri State 


25SX Ctyx 


PORTS 


4 - RS232 


M0S831 OuART 




2-sbtPwakf 


Mcaei pm 


CLOCK 


MK48T02 


Real Tina Cb* Bat B/U 


EPROM 


16K,32KorMK 


Seklafe 


FLOPPY 


wwm 


SIMOmw 


HftRDOtSK 


Wsrtace Port 


WD1QQ2 Board 



I System tnchidea OS-9 68K or SK1XIS - Your Choice 

Specifications: 

I 
I 
I 
I 
i 
I 

If Now more serial ports - faster CPU i 
j Battery B/U - and $850.00 OS-9 Profes- 1 
I slonal with C compiler included! 



*$400.00 



See Mustang-02 Ad - page 5 
for trade-in detals 
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MUSTANG-08 



LOOK 



Sffmis 



32 ta Rryjta 
fnega Ixng 
.18.0. ..9.0 

..9.8. ..6.3 



/•Ml;'/ 
regletar king I; 

for (U>; I < 999999; ++{); 



a 25 Megabyte 
4^ Hard Disk System 

$2,398.90 

Complete with PROFESSIONAL OS-9 

includes the $500.00 C compiler, PC 

style cabinet, heavy duty power supply, 

5" DDDS 60 track floppy, 25 MegByte 

i Hard Disk - Ready to Run j 

UnSte other 68006 systems there are several significant 
dXervoB. The MUSTANG-08 is a full 12 Megahertz system. The 
RAM uses NO wal states, thb means ful bore MUSTANG type 
performance. 

Also, albwing for addressafie ROtvWROM the RAM is the 
ma>drnum allowed for a 68008. The 68008 can only address a 
total of 1 Megabytes of RAM The design stows al the RAM 
apace (for al practical opposes) to be utilised. What Is not 
avalabte to the user is required and reserved for the system. 

A RAM disk of 460K can be eesly corfgured, leaving 288K 
free for pagrarrvsyOam RAM apace. The RAM OtSK can be 
configured to any soe your appfcafo n requres (system must 
have 128K in addition to b other requlremerRs). Leevrg the 
remaaider of the onghaf 768K for program use. SJfaart 
source included (drivers, etc.) 



MUtTAKOOitao 
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Data-Comp Division 

n /;"^«M^v\ A Decade of Quality Service"^ 
*J ^ Systems WorUWkle 

Computer Publishing, Inc. 5900 Cassartfa Sntfi Road 
Tetoprone 615 842-4601 • Telex 510 600-6630 Hixsori Tn 37343 

S 

* These wfti SWffPC r*dan*ry FLEX 5" - Cci for jpectt hta. 



